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I OPffN 6,0'CHO 6'LIST 

10 Ht-H ABCSIH AMD ABCC05 FUHCT.AHS FOR THE Cn"WIBWlE PET 
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W ftEM 

IM REM OPEN OUTPUT FILE OH OEVICF. H. 

Ill OPEN 5,0 

120 UEU 

5M REM CET A 7IKE VALUE 

510 INPUT 5 

520 c-s 

5W feEM 

I WW HEM THE «INE OF THE AHCLE IS S 

10101 ACM IF THE SIH IS IM THE BAMCE OF -I TO I. THFH CHUPIJTE 
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INJfl A<i-9fltGIITn20M 
I (WW REM TIIE AHCSIHE IS AX 
IH5* AS-ATHtS/Ml-S**)*.*)) 
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2mm REM THE COSINE OF THE AHCT.E 15 C 
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The CONNECTICUT microCOMPUTEK AUApter model 1200 is the first in a line of peripheral adapters for the 
COMMODOUE PET. The CmC ADA 1200 drives an fiS-232 printer from the PET IEEE-488 bus. The CmC ADA I2W allows 
the PET owner to ootain hard copy program listings, and to type letters, manuscripts, mailing labels, tables 
of date, pictures, invoices, grfphs, checks, needlepoint patterns, etc., using a standard RS-232 printer. 

The CnC ATA model I2CWB comes assembled and tested, without power supplies, case, or RS-232 connector 
for $98.50. The CmC ADA 1 2WC comes complete for $169.00. Specify baud rate when ordering. (300 baud is 
supplied unless otherwise requested. Instructions for changing the baud rate are included.) 
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iVflHD PROCESSOR FOH THE COMMODORE PET 

CONNECTICUT mlcroCOMPUTER now has a word processor program for the COMMODORE PET. This proa 
conposlnt] and prlntlno letters, flyers, advertisements, manuscripts, articles, etc., using the C 
and an hS-232 printer. 

Script directives Include line length, left margin, centering, and skip. Edit commands alio 
Insert lines, deletp lines, move lines, change strings, save onto cassette, load from cassette, 
down, print and type. 

The CmC Word Processor Program addresses an RS-232 printer through a CmC printer adapter. 

The CmC Word Processor Program Is available for S29.50. 

KS-232 TO CUHKENT LOOP/TTL ADAPTEH 



ram permits 
OMMODOhE PET 

w the user to 
move up, move 




The CmC ATApter model Am has two circuits. The first converts an RS-232 signal to a 251 ma current loop 
signal, and the second converts a 20 ma current loop signal to an HS-232 signal. With this device a 
computer's teletype port can be used to drive an HS-232 terminal, or vice versa, without modification of the 
port. The CmC ADA 4tM can also be parelelled to drive a teletype or RS-232 printer while still using the 
computer's regular terminal. The CmC ADA 400 can easily be modified to become an RS-232 to TTL and TTL to 
RS-232 APApter. The CmC AOA 400 does not alter the baud rate and uses standard power supplies. The current 
loop is isolated from the RS-232 signal by optolsol ftors. 

The CmC ADA 4W is the perfect partner for KIM If vou want to use an RS-232 terminal Instead of a 
current loop teletype. 

The CmC AUA 4(o0S comes with drilled, plated through solder pads and sells for S24.50. The CmC ADA 4006 
comes with barrier strips and screw terminals and sells for $29.50. / . 



This snnounconont .v c -s composed on a COMMODORE PET and printed on a GE 
TermiNet using e CmC ADA I200C printer adapter and the CmC Word Processor 
Proa ram. 
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With this issue we introduce a new format for 
MICRO. We were dissatisfied with the quality of 
the last couple of issues of MICRO, particularly 
the last issue, and decided to try a different 
type of printing. This new format is similar 
to the old, but is on lighter paper, printed on 
a web press, saddle stiched instead of side 
Stapled, and does not have the old MICRO border. 
We have kept the features that most people said 
they wanted - especially the three hole punch. 
Of course , we will not know the quality of the 
new printer's product until after this goes to 
press. If you have any comments, let us hear 
from you. 

Rick Auricchio , who wrote "An Apple II Program- 
mer 's Guide" in MICRO number 4, has provided 
another super article in "BREAKER: An Apple II 
Debugging Aid". This article/program allows the 
Apple user to debug his program with real break- 
points which permit the user to interrupt his 
program at any point, gain control, and then 
continue execution. The program, written in 
assembler has a lot of useful techniques and is 
presented in its entirety. 

Those of you planning to add more RAM to your 
Apple II will find some valuable comparative 
information about 16K RAMS in Allen Watson Ill's 
article on "MOS 16K RAM for the Apple II". This 
info includes a table on how to decode how the 
various manufacturers encode their access times. 

William M. Shryock lr. presents an "Improved 
Star Battle Sound Effects" program for the Apple 
II based on the original article by Andrew H. 
Eliason in issue number 6. 

Gary A. Creighton has a number of items for the 
PET under the title "PET Update". Included are 
a discussion of the RND (Random Number) Function 
use, a short program for Machine Language Stor- 
ing in BASIC, some rules for USR Parameter Pass- 
ing, and a machine language program to Save 
Mancine Language and Load Directly. A most use- 
ful set of goodies for the PET user. 

Marvin L. Oe 3ong's series on "6502 Interfacing 
for Beginners" continues with a discussion of 
"The Control Signals". The article presents the 
basic theoretical information, and then a pro- 
gram and hardware test configuration for ex- 
perimenting with the control signals. 

Quite often you may find that you have two sets 
of object code that are very similar, but not 
identical. It would be useful to have some way 
to let the computer compare the two sets of code 
and display the differences. This may sound 
simple, but since the addition of a single line 
of code would make all subsequent lines "differ- 
ent" even though they were identical except for 
the slight offset, it is not so simple. 3. S. 
Green presents the solution and a program in 
"6502 Opcode Sequence Matcher". 



Ever have doubts about your PET 's memory? Then 
you will want to try "A Memory Test Program for 
the Commodore Pet" by Michael 3. McCann. The 
program requires that the lowest 4K of memory be 
working and can be used to test all other memory 
in the PET. 

Marc Schwartz presents some rules and ideas for 
"Apple Calls and Hex-Decimal Conversion", a use- 
ful tool when trying to generate the decimal 
equivalents for hex codes. 

Once upon a time there were hardly any articles 
about 6502s at all. Now William R. Dial's "6502 
Bibliography" is up to reference number 379, and 
this includes many multiple references. Since 
a reference of interest is of limited value if 
you do not know where to find the original, a 
list of "6502 Information Resources" has been 
compiled by William R. Dial that tells where to 
obtain the various magazines he has been using 
in the bibliography and how much they cost. 

Every once in a while someone will ask "What can 
you do with a KIM-1 now that the PET is here?" 
Joseph L. Powlette and Charles T. Wright show 
how to use the "KIM-1 as a Digital Voltmeter". 

An automated "Cassette Tape Controller" is the 
subject of Fred Miller's KIM article. He pre- 
sents a complete hardware/software system to aid 
the user who wants to control cassette tapes 
from his KIM. 

Andrew H. Eliason discusses the "Apple II High 
Resolution Graphics Memory Organization", and 
presents a few short programs that help to un- 
derstand and use this feature of the Apple. 

Chris Sullivan presents the first program that 
he wrote for the new Synertek SYM-1, "A Digital 
Clock Program for the SYM-1". The program is a 
24 hour clock and has a number of SYM specific 
subroutine calls and special locations which 
make it a good introduction for the SYM owner. 

Commodore thought they were being pretty smart 
making the PEEK in BASIC incapable of PEEKing at 
BASIC itself. Harvey B. Herman was even smarter 
and shows how he is "Peeking at PET's BASIC". 
He raises some questions about Commodore's basic 
strategy. 

"KIMBASE" is a major program by Dr. Barry Tep- 
perman. While the purpose of the program is to 
convert from almost any number system to any 
other, its main value to many readers may be in 
the numerous subroutines which provide support 
multiplying, dividing, and other functions. 
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ME "RE STILL NUMBER ONE ! 
Robert M. Tripp, Editor 



It's been a whole year since I sat down to write 
"We're Number One!" for the first issue of 
MICRO. Since then a lot has happened within the 
microprocessor/microcomputer world, and if any- 
thing, the position of the 6502 as the leader 
has been strengthened. 

THE 6502 MICROPROCESSOR FAMILY 

There have been a couple of major changes in the 
basic 6500 family of microprocessor products. 
Most significant has been the emergence of 
Synertek and Rockwell International as major 
producers of 6500 type products. While many 
companies recognized that the 6500 series of 
products being developed by M0S Technology were 
in many technical aspects superior to the 8080 
and 6800 product lines, they were reluctant to 
commit to a sole source product manufactured by 
a relatively small company. Now that Synertek 
and Rockwell have made major commitments to de- 
velop and support the 6500 line, its growth and 
acceptance should accelerate. 

Rockwell and Synertek are not simply second 
sourcing existing M0S Technology products, but 
are undertaking a number of significant new 6500 
related product developments. Rockwell has in- 
troduced the R6500/1 one-chip microcomputer. 
Synertek is soon to announce a 6551 ACIA. Also 
in the works by Rockwell and/or Synertek are 
a 6545 CRT Controller, a 6509 16 bit micro- 
processor, and a number of other products. It 
looks as though most development work at MCS 
Technology has slowed or stopped and that most 
of their efforts are devoted to supporting the 
PET and KIM-1 systems. 

A searing blast at the 6502 microprocessor which 
was written by Jack Hemenway and appeared in EDN 
was very solidly "put down" by articles by 
several qualified writers which appeared in a 
later issue . 



THE 6502 MICROCOMPUTERS 

This has been a very big year for 6502 based 
systems. Most of the trade talk and magazine 
articles are about the PET, TRS-80, and the 
Apple II, and two-out-of-three ain't bad! The 
Apple II was just becoming available a year ago 
when MICRO started, and in fact was featured on 
the first MICRO cover. Since then the growth of 
the Apple II has been one of the brightest suc- 
cess stories of the year. In a year when many 
of the original 8080 based companies found them- 
selves in deep trouble, the 6502 based Apple 
Computer Company flourished. A year ago it was 
impossible to get a Commodore PET. They had 
been demonstrated at some computer shows, but 
were not yet available . Since then they have 
come on strong. The "grass roots" support for 
the PET seems very strong, judging from the num- 
ber of small magazines that have sprung up de- 
voted to the PET. 

As our new years starts, there are two major new 
6502 system developments. The Synertek SYM-1 is 
a single board computer which is essentially an 
upgrade of the KIM-1. It has more RAM, ROM, and 
1/0 than the KIM, plus a much more powerful mon- 
itor program, plus a number of other features. 
It is just becoming available now, and selling 
for $269 with JK RAM, is hoped to do for Syner- 
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tek what the KIM-1 did for M0S Technology. The 
AIM 65 is Rockwell's way of announcing its 
serious entry into the 6502 world. This single 
board system includes a full typewriter style 
keyboard, twenty character LED display and a 
twenty column printer, plus room for 4K RAM, up 
to 2QK ROM, and an extensive 8K monitor. This 
product is sure to generate a great deal of in- 
terest in the 6502 from a variety of users. 
Both Synertek and Rockwell will be selling 
an assembler in ROM and an 8K BASIC in ROM by 
the end of the year. 

In addition to these major 6502 microcomputer 
systems, a number of other smaller manufacturers 
have introduced 6502 based systems in the past 
year. The only major drop-out during the year 
was ECD's MICROMIND. Since this system was 
never really delivered from production to any 
customers, it's loss was probably of little sig- 
nificance, except to those loyal customers who 
had their money tied up for a year or so. 

6502 SOFTWARE 

Whereas a year ago there were only a small hand- 
ful of programs available for the 6502, there 
must by now be hundreds of them. Both the PET 
and the Apple II have generated large markets 
for 6502 based software, and many stores now 
have large quantities of programs for sale. 

MICRO 

We have been very pleased with the growth of 
MICRO in its first year. The first issue was 
28 pages long and went to about 450 subscribers 
and stores. This issue is twice the size and 
will immediately go out to about 2000 subscrib- 
ers and about 1500 more copies will go to the 
computer stores. A distributorship has been 
established in Europe to handle the growing in- 
terest over there. And, due to popular demand, 
"The BEST of MICRO" will soon be published so 
that new subscribers can get the information 
from the first year of MICRO. Over 3000 copies 
of each issue have been distributed, many as 
"back issues" to new subscribers. We are also 
quite proud of the quality of the articles 
which have been contributed over the year. We 
anticipate similar growth during the coming year 
as the 6502 continues in phenomenal expansion. 



Our plans for the coming year include increasing 
the size of MICRO as required to print all of 
the worthwhile articles we receive. Our new 
printing format will permit us some increase in 
size without requiring an increase in price. If 
we continue to receive more good stuff than we 
can print, then we will consider becoming a 
monthly publication. In order to serve the fast 
growing European market , we have arranged to 
have MICRO distributed by L P Enterprises in 
Britain. This will help keep the cost to 6502 
owners in Europe reasonable. 

Our success in the coming year depends on your 
input. We can be no better than the material 
submitted to us. You have done a great job so 
far, so keep up the good work. 
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BREAKER: AN APPLE II DEBUGGING AID 

Rick Auricchio 

59 Plymouth Ave. 

Maplewood, N3 07040 
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When debugging an Assembly-language program, one 
of the easiest tools the programmer can use is 
the Breakpoint. In its most basic form, the 
Breakpoint consists of a hardware feature which 
stops the CPU upon accessing a certain address; 
a "deluxe" version might even use the Read/Write 
and Sync (instruction fetch) lines to allow 
stopping on a particular instruction, the load- 
ing of a byte , or the storing of a byte in mem- 
ory. Since software is often easier to create 
than hardware (and cheaper for some of us!), a 
better method might be to implement the Break- 
point with software, making use of the BRK op- 
code of the 6502 CPU. 

A Breakpoint, in practice, is simply a BRK op- 
code inserted over an existing program instruct- 
ion. When the -user program's execution hits the 
BRK, a trap to the Monitor (via the IRQ vector 
$FFFE/FFFF) will occur. In the APPLE, the Mon- 
itor saves the user program's status and regis- 
ters, then prints the registers and returns con- 
trol to the keyboard. The difficult part, how- 
ever, comes when we wish to resume execution of 
the program: the BRK must be removed and the 
original instruction replaced, and the registers 
must be restored prior to continuing execut- 
ion. If we merely replace the original opcode, 
however , the BRK will not be there should the 
program run through that address again. 

The answer to this problem is BREAKER: a soft- 
ware routine to manage Breakpoints . What the 
debugger does is quite simple : it manages the 
insertion and removal of breakpoints, and it 
correctly resumes a user program after hitting 
a breakpoint. The original instruction will be 
executed automatically when the program is res- 
umed! 

Is it Magic? 

No, it's not magic, but a way of having the 
computer remember where the breakpoints are! 
If the debugger knows where the breakpoints are , 
then it should also know what the original in- 
struction was. Armed with that information, 
managing the breakpoints is easy. Here's how 
the debugger works : 

During initialization, BREAKER is "hooked- in" to 
the APPLE monitor via the Control-Y user com- 
mand exit , and via the COUT user exit . The con- 
trol-Y exit is used to process debugger com- 
mands, and the COUT exit is used to "steal con- 
trol" from the Monitor when a BRK occurs. 

Breakpoint information is kept in tables: the 
LOCTAB is a table of 2-byte addresses — it con- 
tains the address at which a breakpoint has been 
placed. The ADTAB is a table of 1-byte low- 
prder address bytes; it is used to locate a 
Break Table Entry (BTE for short). The BTE is 
12 bytes long (only the first 9 are used, but 12 
is a reasonably round number) and it contains 
the following items: 

* Original user-program instruction 

* JMP back to user- program 

* JMP back for relative branch targets 

When adding a breakpoint , we must build the BTE 
correctly, and place the user-program break add- 



ress into the LOCTAB. There are eight (8) 
breakpoints allowed, so that we have a 16-byte 
LOCTAB, 8-byte ADTAB, and 96 bytes of BTE's. 

As the breakpoint is added , the original inst- 
ruction is copied to the first 3 bytes of the 
BTE, and it is "padded" with NOP instructions 
($EA) in case it is a 1 or 2-byte instruction. 
A BRK opcode ($00) is placed into the user pro- 
gram in place of the original instruction's op- 
code (other instruction bytes are not altered). 
The next 3 bytes of the BTE will contain a JMP 
instruction back to the next user-program inst- 
ruction. 

If the original instruction was a Relative 
Branch, one more thing must be considered: if 
we remove the relative branch to the BTE, how 
will it branch correctly? This problem is sol- 
ved by installing another JMP instruction into 
the BTE for a relative branch — back to the Tar- 
get of the branch, which is computed by adding 
the original PC of the branch, +2, +of fset . 
This Absolute address will be placed into the 
JMP at bytes 7-9 of the BTE. The offset which 
was copied from the original instruction will be 
changed to $04 so that it will now branch to 
that second JMP instruction within the BTE; the 
JMP will get us to the intended target of the 
original Relative Branch. 

A call to the routine "INSDS2" in the Monitor 
returns the length and type of an instruction 
for the "add" function. The opcode is supplied 
in the AC, and LENGTH & FORMAT are set approp- 
riately by the routine. 

Removal of a breakpoint involves simply rest- 
oring the original opcode, and clearing the 
LOCTAB to free this breakpoint's BTE. 



Displaying of breakpoints prints the user-prog- 
ram address of a breakpoint , followed by the 
address of the BTE associated with the break- 
point (the BTE address is useful — its importance 
will be described later). 

When the breakpoint is executed, a BRK occurs 
and the APPLE Monitor gets control . The monitor 
will "beep" and print the user program's regis- 
ters. During printing of the registers, BREAKER 
will take control via the COUT exit. (Remember, 
we get control on every character printed - but 
it's only important when the registers are being 
printed. That's when we're at a breakpoint). 
While it has control, BREAKER will grab the 
user-program's PC and save it (we must subtract 
2 because of the action of the BRK instruction) . 
If no breakpoint exists at this PC (we scan LOC- 
TAB) , then the Mointor is continued. If a 
breakpoint does exist here , then the BTE ad- 
dress is set as the "continue PC" . In other 
words, when we continue the user program after 
the break, we will go to the BTE; the original 
instruction will now be executed, and we will 
branch back to the rest of the user program. 

Using BREAKER 

The first thing to do is to load BREAKER into 
high memory. It must then be initialized via 
entry at the start address. This sets up the 
exits from the Monitor. After a Reset, you must 
re-initialize via "Ycl" to set up the COUT exit 
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again. Upon entry at the start address, all 
breakpoints are cleared; after "Yd" , they re- 
main in effect. 

To add a breakpoint, type: aaaaYcA . (Yc is 
control-Y). This will add a breakpoint at 
address 'aaaa' in the user program. A 'beep' 
indicates an error; you already have a break- 
point at that address . To remove a breakpoint , 
type: aaaaYcR. This will remove the breakpoint 
at address 'aaaa' and restore the original op- 
code. A 'beep' means that there was none there 
to start with . 

Run your user-program via the Monitor's "G" com- 
mand . Upon hitting a breakpoint , you will get 
the registers printed, and control will go back 
to the monitor as it does normally. At this 
point, all regular Monitor commands are valid, 
including "YcA", "YcR", and "YcD" for BREAKER. 

To continue execution (after looking at stuff 
maybe modifying some things), type: YcG . This 
instructs BREAKER to resume execution at the BTE 
(to execute the original instruction), then to 
transfer control back to the user program. Do 
not resume via Monitor "G" command — it won't 
work Droperly, since the monitor knows nothing 
of breakpoints. To display all breakpoints, 
type: YcD. This will give a display of up to 8 
breakpoints, with the address of the associated 
BTE for each one. 



Caveats 

Some care must be taken when using BREAKER to 
debug a program. First, there is the case of 
BREAKER not being initialized when you run the 
user program. - This isn't a problem when you 
start, because you'll not be able to use the Yc 
commands. But if you should hit Reset during 
testing, you must re-activate via "Yd", 
otherwise BREAKER won't get control on a break- 
point. If you try a YcG, unpredictable things 
will happen . If you know that you hit a break- 
point while BREAKER was not active, you can 
recover. Simply do a "Ycl", and then display 
the breakpoints (YcD). Resume the user-pro- 
gram by issuing a Monitor "G" command to the BTE 
for the breakpoint that was hit (since BREAKER 
wasn't around when you hit the breakpoint, you 
have to manually resume execution at the 
BTE). Now all is back to normal. You can tell 
if BREAKER is active by displaying loc- 
ations $38 and $39. If not active, they will 
contain $F0 FD. 



It's also important to note that any user pro- 
gram which makes use of either the Control-Y or 
COUT exits can't be debugged with BREAKER. Once 
these exits are changed, BREAKER won't get con- 
trol when it's supposed to. 



BREAKER DEBUGGER: Routines to Handle up to 8 
Breakpoints, for use in Debugging of User Code. 



002E 
002F 
003C 
003D 
003E 
003F 
0040 
0041 

0036 
0037 

F88E 
F940 
FDDA 
FEED 
FF65 
FF69 



0000007D 
7D0 
7D00 4C 36 7F 



7D0 3 
7D04 
7D0 5 
7C06 



00 

00 
00 
00 



**** APPLE-2 MONITOR EQUATES 

* 

FORMAT EQU 

LENGTH EQU 

AIL ECU 

A1H ECU 

A2L EQU 

A2H EQU 

A3L EQU 

A3H ECU 

CSWL EQU 

CSWH EQU 

INSDS2 EQU 

PRNTYX EQU 

PRPYTE EQU 

COUT ECU 

RESET EQU 

MOM EQU 

* CHANGE ' LOWPAGE' TO LOCATE 

* ELSEWHERE IN MEMORY. IT IS 

* NOW SET FOR A 3 2K SYSTEM. 



X'2E' 
X'2F' 
X'3C 
X'3C' 
X'3E' 
X'3F' 
X'40' 
X'41' 

X'36' 
X'37" 

X'F88E' 
X'F940' 
X'FDDA' 
X'FDED' 
X'FF65' 
X'FF69" 



LOWPAG E 



INIT 

* 

* 

FWl 
FW2 
PCL 
PCH 



EQU 
ORG 
JMP 



DATA APEAS 

DC 
DC 
DC 
DC 



X'7D' 

LOW PACE* *8 
INITX 



INSTRUCTION FORMAT 
INSTRUCTION LENGTH 
WORK AREA 



COUT SWITCH WORD 



DISASSEMBLER 

PRINT Y/X REGS IN HEX 

PRINT AC IN HEX 

CHAR OUT 

MONITOR RESET 

MONITOR ENTRY 



3 PGS BEFORE END MEMORY 
ORG OUT TO MEMORY TOP 
^INITIALIZATION ENTRY 



'FINDPC WORK BYTE 1 
'FINDPC WORK BYTF 2 
■GO' PC LO 
•GO* PC HI 



7D07 
7D08 
7D09 
7D0A 
7D0D 



00 

EA 

EA 

4C 00 00 

4C 



** SKELETON EREAK-TAELE ENTRY (ETE) 



SKEL 



DC 

NOP 

NOP 

JMP 

DC 




X'4C* 



SKELETON BTE 
NOPS FOR PADDING 

JUMP BACK INLINE 

JUMP OPCODE FOR BRANCHES 
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* — LO ADDRESS OF BTE'S KEPT IN ADTAB — 



7D0E 
7D0F 
7D10 
7D11 
7D12 
7D13 
7D14 
7D15 



7D16 



7D26 
7D32 
7D3E 
7D4A 
7D56 
7D62 
7D6E 
7D7A 



26 
32 
3E 
4A 
56 
62 
6E 
7A 



ADTAB 



DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 



BTE0&255 
BTE1&255 
BTE2&255 
ETE3&255 
BTE4&255 
BTE5&255 
BTE6&255 
ETE7&255 



LO ADDRESS 



EREAK-TABLE ENTRIES {BTE'S) 



SPACE FOR 16 PCH/L PAIRS 



12-BYTES RESERVED 



** — LOCTAE CONTAINS ADDRESS OF USER-PROGRAM INSTRUCTION 

* WHERE WE PLACED THE BREAKPOINT IN THE FIRST PLACE. 

* 

LOCTAB DS 2*8 

* 
** 

* 

BTE0 DS 12 

BTE1 DS 12 

BTE2 DS 12 

ETE3 DS 12 

BTE4 DS 12 

BTE5 DS 12 

BTE6 DS 12 

BTE7 DS 12 

* END OF DATA AREAS 

* THE REST IS ROM-ABLE. 

* 



ENOUGH FOP 8 BREAKPOINTS 



****************************** 



*********************************** 











* 


NAME: 


FINDPC 


















* 


PURPOSE: 


CHECK 


IF 


PC 


IN FY 


'1/FW2 MATCHES ANY IN LOCTAB 










* 


RETURNS: 


CARRY 


SET 


IF 


YES; 


XREG-ADTAE INDEX 0-7 










* 




CARRY 


CLR 


IF 


NOT; 


XREG«GARBAGE 










* 


VOLATILE 


:DESTROYS 


AC 














***************************************************************** 


7C86 


A2 


0F 




FINDPC 


LDXIM 


15 








BYTE-INDEX TC END OF TAELE 


7D88 


AD 


04 


7D 


FPC00 


LDA 


FW2 








GET FOR COMPARE 


7D8F 


DD 


16 


7D 




cmpx 


LOCTAE 








A PCH MATCH? 


7D8E 


D0 


08 






ONE 


FPC02 








=>NO. TRY NEXT 2-PYTE ENTRY 


7D90 


AD 


03 


7C 




LDA 


FW1 








GET PCL MOW 


7D93 


DD 


15 


7D 




CMPX 


LOCTAE 


-1 






A PCL HATCH? 


7D96 


F0 


06 






EEC 


FPC04 








=>YES! WE HAVE A EREAKPOINT! 


7D98 


CA 






FFC02 


DEX 










EACK UF ONE 


7D99 


CA 








DEX 










AND ANOTHER 


7D9A 


10 


EC 






BPL 


FFC00 








=>DO ENTIRE TABLE SCAN 


7D9C 


18 








CLC 










->DONE; SCAN FAILED 


7D9D 


60 






it 


RTS 












7C9E 


48 






FPC04 


PHA 










HOLD AC 


7D9F 


8A 








TXA 










HALVE VALUE IN XREG 


7DA0 


4 rt 








LSRA 










SINCE IT'S 2-EYTE INDEX 


7DA1 


AA 








TAX 












7DA2 


68 








FLA 












7 DA 3 


38 








SEC 










SET 'SUCCESS' 


7DA4 


60 








RTS 













7DA5 
7 DA 7 



E0 
D0 



FP 
27 



***************************************************************** 

* Nrtt'E: EPEAK 

PUPFCSE: HANDLE ENTRY AT ERK AND PROCESS BREAKPOINTS 

MOTE- THIS RCUTINF GETS ENTERED ON *EVERY* 'COUT' 

CALL--IT KNOWS rtEOUT DRK BECAUSE THE MONITOR'S 

REGISTERS ARE SETUP TC PRINT USER REG CONTENTS. 

AFTER PROCESSING IS DONE, LT RESTORES THE MONITOR'S 

EEC'S AND RETURNS. 
***************************************************************** 

PREAK CPXIM X'FE' IS XREG SET FOR EXANINE-REGS ? 

ENE ERKXX «>KC GET OUT NOW. 
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7DA9 


C9 


A0 




7DAB 


D0 


23 




7 DAD 


A5 


3C 




7DAF 


38 






7DB0 


E9 


02 




7DB2 


8D 


03 


7D 


7DB5 


A5 


3D 




7DB7 


E9 


00 




7DE9 


8D 


04 


7D 


7DBC 


20 


86 


7D 


7DBF 


90 


0B 




7DC1 


BD 


0E 


7D 


7DC4 


8D 


05 


7D 


7DC7 


A9 


7D 




7DC9 


8D 


06 


7D 


7DCC 


A9 


A0 




7DCE 


A2 


FB 




7DD0 


4C 


F0 


FD 



BRK02 



BRK0 4 



ERKXX 



CMPIM 


X'A0' 


BNE 


ERKXX 


LDAZ 


AIL 


SEC 




SECIM 


2 


STA 


FW1 


LDAZ 


A1H 


SECIM 





STA 


FW2 


JSR 


FINDPC 


BCC 


BRK04 


LDAX 


ADTAE 


STA 


PCL 


LDAIM 


LOWPAGE 


STA 


PCH 


LDAIM 


X'A0' 


LDXIM 


X'FB' 


JMP 


X'FDF0' 



IS AC SETUP CORRECTLY TOO? 
->NOPE. FALSE ALARM! 
GET USER PCL 

AND BACK IT UP 
EY 2 EYTES SINCE 
BRK BUMPED IT! 
GET PCH 
DO THE CARRY 

AND SAVE THAT TOO 
A EREAKER OF OURS HERE? 
«>NOPE. WE WON'T HANDLE IT! 
YES; GET BTE ADDRESS THEN 

AND SET IT AS THE 'GO' 
PC FOR THE 'GO' COMMAND. 
{OUR PAGE FOR ETE'S) 

SET AC EACK FOR MONITOR 

AND XREG TOO 
«>NO. RIGHT EACK TO COUT ROUTINE! 



7DD3 


AD 


05 


7DD6 


85 


3C 


7DD8 


AD 


06 


7DDB 


85 


3D 


7DDD 


4C 


B9 



***************************************************************** 

*** PROCESS THE 'GO' COMMAND {RESUME USER EXECUTION) ** 

* COMMAND FORMAT: { * Yc G ) . 

***************************************************************** 

7D CMDGO LDA PCL GET RESUME PCL 

STAZ AIL AND SETUP FOR MONITOR 

7D LDA PCH TO SIMULATE AN "XXXX G' COMMAND 

STAZ A1H NORMALLY. 

FE JMP X'FEE9' «>SAIL INTO MONITOR'S 'GO' 



7DE0 

7DE2 

7DE3 
7DE6 

7DE8 
7DEA 
7DEB 
7DEE 



7DF0 
7DF2 
7DF4 
7DF6 
7DF8 
7DFA 
7DFC 
7DFE 
7E00 
7E02 

7E05 
7E08 
7E0B 



***************************** 

** WE GET CONTROL HERE 

* MONITOR (ON KEYINS) . 

* CONTROL WILL PASS TO 
***************************** 



A2 


FF 




KEYIN 


LDXIM 


X'FF' 


E8 






KEYIN00 


INX 




BD 


00 


02 






LDAX 


X'0200' 


C9 


99 








CMPIM 


X'99' 


D0 


F8 








BNE 


KEYIN00 


E8 










INX 




BD 


00 


02 






LDAX 


X'0200' 


C9 


C7 




* 




CMPIM 


X'C7' 








* 


A ERANCH-TAELE WOULD EE 








* 


NEATER, EUT 


IT WOULD 








* 


TAKE 


UP MORE 


CODE FOR 








* 
* 


THE 


7 EW OPTIONS WE HAV 



************************************ 

ON THE CONTPOL-Y USER EXIT FROM THE 
ALL COMMANDS ARE SCANNED HERE; 

THE APPROPRIATE ROUTINE. 
************************************ 

CHAR INDEX 

SET NEXT CHARACTER 

GET CHAR FROM KEYIN EUFFEP 

CONTROL-Y CHARACTER? 

«>NO. KEEP SCANNING 

BUMP OVER CTL-Y 

GRAE COMMAND CHARACTER 

IS IT 'G' {GO) ? 



F0 


El 






BEQ 


CMDGO 


C9 


CI 






CMPIM 


X'Cl' 


F0 


18 






BEQ 


CMDADD 


C9 


C4 






CMPIM 


X'C4' 


F0 


0B 






BEQ 


XXDISP 


C9 


D2 






CMPIM 


X'D2' 


F0 


0A 






EEC 


XXREMOVE 


C9 


C9 






CMPIM 


X'C9' 


F0 


09 






EEQ 


XXINIT 


4C 


65 


FF 


EADCMD 

* 


JMP 


RESET 


4C 


A8 


7E 


XXDISP 


JMP 


CMDDISP 


4C 


08 


7F 


XXPEMOVE 


JMP 


CMDREMOV 


4C 


4F 


7F 


XXINIT 


JMP 


CMDINIT 



OYES. 

IS IT 'A' {ADD) ? 

->YES. 

IS IT ' D' {DISPLAY) ? 

=>YES. 

IS IT 'P' {REMOVE) ? 

OYES. 

IS IT 'I' {INIT} ? 

=>YES. 

NOTHING; IGNORE IT! 

EXTENDED BRANCH 
EXTENDED ERANCH 
EXTENDED ERANCH 
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7E*JE 

7E10 
7E12 



7E14 
7E16 
7 El 9 
7E1P 
7E1E 
7E20 
7E21 
7E22 
7E24 



a0 00 

El 3E 
F0 EE 



A2 0F 
ED 16 7D 
D0 5 
PD 15 
F0 06 
CA 
CA 

10 F2 
30 DC 



7D 



* *** * 

* * 

* 

* **** 

CMDAD 



************************************************************ 

PROCESS THE 'ADC COMMAND.. ADD A BREAKPOINT AT 
LOCATION SPECIFIED IN COMMAND 
COMMAND FORMAT: { * aaaa Yc A ) . 
************************************************************ 

D LDYIM CHECK OPCODE FIRST 



LDAIY 
EEO 



A2L 
EADCMD 



OP AT AAAA A BRK ALREADY? 
=>YES. ILLEGAL! 



* 

* 

ADD00 



iDD0; 



SCAN LCCTAE FOP AH AVAILADLE ETE TO USE * 



LDXIM 

LDAX 

ENE 

LDAX 

EEO 

DEX 

DEX 

EFL 

EMI 



15 

LOCTAF 
ADD 2 
LOCTAB-1 
ADD 4 



ADD00 
EADCMD 



EYTE INDEX TO LOCTAE END 
GET A EYTE 
= >IN USE 
GET HI HALF 
=> BOTH ZERO; USE IT! 
HOVE BACK TO 
NEXT LOCTAE ENTRY 
AND KEEP TRYING! 
=>DONE? ALL FULL! REJECT I: 



7E26 
7E28 
7E2P 
7E2E 
7E30 
7E33 
7E36 
7E37 
7E38 
7E39 
7E3E 
7E3D 
7E40 
7E4 2 
7E44 
7E47 
7E49 
7E4A 
7E4C 
7F4D 
7E4F 
7E51 
7E54 
7E56 
7E5 8 
7E5A 



.A5 3E 
9D 15 7D 
8D HE 7D 
A5 3F 
9D 16 7D 
8D 0C 7D 
8A 
4A 
AA 

A9 7D 
85 41 
ED 0E 7D 
85 40 
A0 7 
E9 7 7D 
91 40 
88 

10 F8 
C8 

El 3E 
91 40 
20 8E F8 
A9 
91 3E 
A5 2F 
38 



ADD04 



4DD06 



LDAZ 

STAX 

STA 

LDAZ 

STAX 

STrt 

TXA 

LSFA 

TAX 

LDAIM 

STAZ 

LDAX 

STAZ 

LDYIM 

LDAY 

STAIY 

DEY 

FPL 

INY 

LDAIY 

STAIY 

JSR 

LDAIK 

STAIY 

LDAZ 

SEC 



A2L 

LOCTAE- 

SKEL+4 

A2K 

LOCTAE 

SKEL+5 



LOWPAGE 

A3K 

ADTAF 

A3L 

7 

SKEL 

A3L 

ADD0 6 

A2L 

A3L 

INSDS2 



A2L 

LENGTH 



GET ddda VALUE 

SAVE LO HALF 

STUFF LO ADDR INTO ETE 

GET dddd VALUE 

SAVE HI HALF 

STUFF HI ADDR INTO ETE 

GPAE INDEX FOR LOCTAE 

MAKE ADTAB INDEX 

AND STUFF PACK INTO XREF 
ETE'S HI ADDRESS VALUE 
HOLD IN V'ORK AREA 
GET ETE LO ADDR FROM ADTAE 
SAVE IN WORK AREA 
7 -BYTE MOVE FOR SKEL ETE 
GFT SKEL FYTE 
MOVE TO ETE 
SET NEXT 
= > MOVE ENTIRE SKELETON' 

GET ORIGINAL OPCODE 

INTO ETE 
INSDS2 (TO DISASSEMBLE) 
SET ERK OPCODE 

OVER ORIGINAL OPCODE 
GET INSTRUCTION LENGTH 



7E5F 
7E5C 
7E5F 
7E61 
7E6 2 
7E64 



ri0 04 
71 4 
91 40 
C8 

Ei 40 
69 00 



SET UP JKP TO NEXT INST. IN THE ETE 

4 

ri3L 
A3L 

A3L 



LDYIM 

aDCIY 

STAIY 

INY 

LDAIY 

ADCIM 



ADD TO PC FOR DESTINATION 
STUFF INTO ETE 







RUN UP THE CARRY 
RIGHT HERE 



***************************************************************** 

* DISPLAY rtLL ACTIVE BREAKPOINTS 

* COMMAND FOFMAT: (* Yc D ) 
***************************************************************** 

INDEX TO LOCTAE END 

GET A EYTE 

= >IN USE 

TRY POTH EYTES TO BE SURE 

=> DEFINITELY IN USE. 

SET NEXT ENTRY 

IN LOCTAE 
=> MORE TO GO 
=>PCNE: EXIT TO MONITOR 



7E rt 8 


A2 


0F 




CMDDISP 


LDXIM 


15 


7EAA 


PC 


16 


7D 


DISF00 


LDrtX 


LOCTAF 


7 FAD 


D0 


kJF 






EKE 


DISP04 


7EAF 


ED 


15 


7C 




LDAX 


LOCTAE -1 


7EP2 


D0 


6 






PHE 


DISP04 


7EE4 


CA 






DISFMXT 


CEX 




7EP5 


CA 








DEX 




7EE6 


10 


F2 






PPL 


DISP00 


7EE8 


3 


C7 






DMT 


CMDRET 
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7EBA 
7EEB 
7EBC 
7EBF 
7EC2 
7EC4 
7EC6 
7EC7 
7ECA 
7ECC 
7ECF 
7ED0 
7ED1 
7ED2 
7ED3 
7ED5 
7ED8 
7 EDA 
7EDC 
7EDF 
7EE2 
7EE4 
7EE7 
7EE9 



7EEC 
7EEE 
7EF1 
7EF3 
7EF5 
7EF8 
7EFA 
7EFD 
7F00 
7F01 
7F02 



8A 


D 


48 




BC 16 


7D 


BD 15 


7D 


84 3B 




8 5 3A 




AA 




20 40 


F9 


A9 A0 




20 ED 


FC 


68 




48 




4A 




AA 




A9 BC 




20 ED 


FD 


A9 7D 




85 3F 




20 DA 


FD 


BD 0E 


7D 


85 3E 




20 DA 


FD 


A9 BE 




20 ED 


FD 




* 




* 




* 




* 




* 


A9 A0 




20 ED 


FD 


A0 00 




Bl 3E 




20 DA 


FD 


El 3E 




20 8E 


F8 


20 04 


7F 


68 




AA 




10 E0 





DISP04 TXA GET INDEX 

SAVE IT 

GET SUBJECT-INST PCH 
AND ITS PCL 

SET UP PCH/PCL FOP 
DISASSEMBLE?. . . 

PRINT Y,X BYTES IN HEX 
PRINT ONE 

SPACE HERE 
RESTORE INDEX 

CONVERT TO ADTAE IN EX 

'<' CHARACTER 

PRINT IT 

BTE HI ADDRESS 

SET INDIRECT POINTER 

PRINT BEX BYTE 

GET PTE LO riDDR 

SET INDIRECT POINTER 

PRINT ETE FULL ADDRESS 

'>' CHARACTER 
PRINT IT 

DISASSEMBLE THE ORIGINAL INSTRUCTION. PICK UP 
ORIGINAL OPCODE FROM ETE, ORIGINAL ADDRESS 
FIELD FROM USER PROGRAM LOCATION. 



TXA 




PHA 




LDYX 


LOCTAE 


LDAX 


LCCTAB- 


STYZ 


X'3B' 


STAZ 


X'3A' 


TAX 




JSR 


PRNTYX 


LDAIM 


X*A0' 


JSR 


COUT 


PLA 




PHA 




LSRA 




TAX 




LDAIM 


X'EC 


JSR 


COUT 


LDAIM 


LOWPAGE 


STAZ 


A2H 


JSR 


PRBYTE 


LDAX 


ADTAE 


STAZ 


A2L 


JSR 


PREYTE 


LDAIM 


X'EE 1 


JSR 


COUT 



LDAIM 

JSR 

LDYIM 

LDAIY 

JSR 

LDAIY 

JSR 

JSR 

PLA 

TAX 

EPL 



X'A0' 

COUT 



A2L 

PFEYTE 

A2L 

INSDS2 

JSRKLUGE 



DISPNXT 



PRINT ONE 

SPACE HERE 
INDEX 

GET OPCODE FROM ETE 
PRINT OPCODE 
GET OPCODE FROM ETE 

AND CET FCRNaT/LENGIH 
SNEAK INTO INSDSP @ F8C9 

RESTORE LOCTAE INDEX 
O DISPLAY THE REST! 



* 

* 

* KLUGE ENTRY INTO SUBROUTINE 

* WHICH FORCES JSR PRIOR TO 



A PHA INSTRUCTION. WE 
TO JSR TO THIS JMP ! 



HAVE 



7F04 
7F05 



48 

4C D9 F8 



JSRKLUGE PHA 
JMP 
END OF 



******** 



X'F8D9' 
KLUGE! ***** 



PUSH MNEMONIC INDEX 
CONTINUE WITH INSTDSF 



***************************************************************** 

* REMOVE a BREAKPOINT AT LOCATION dddd 

* COMMAND FORMAT: ( adaa Yc R ) 
***************************************************************** 

GET ADDRESS LC 
HOLD IT FOR FINDPC 
GET ADDRESS HI 

A BREAKPOINT HERE? 

= >YES 

»>NO: PELL FOR YOU! 

GET THE LOCTAE ENTRY 

HOLD IT 

NOV" CREATE LOCTAE INDEX 



CLEAR CUT THE 
APPROPRIATE 
LOCTAE ENTRY 
FOE THIS FKPT 



7F08 


A5 


3E 




CMDREMOV 


LDAZ 


A2L 


7F0A 


8D 


03 


7D 




STA 


FW1 


7F0D 


A5 


3F 






LDAZ 


A2K 


7F0F 


8D 


04 


7D 




STA 


FK2 


7F12 


20 


86 


7D 




JSR 


FINDPC 


7F15 


E0 


03 






ECS 


RE MOV 2 


7F17 


4C 


65 


FF 


* 


JMP 


RESET 


7F1a 


ED 


0E 


7D 


REMOV02 


LDAX 


ADTAE 


7 FID 


85 


40 






STAZ 


A3L 


7F1F 


8A 








TXA 




7F20 


0A 








AS LA 




7F21 


AA 








TAX 




7F22 


A9 


00 






LDAIM 





7F2 4 


A8 








TAY 




7F25 


9D 


16 


7D 




STAX 


LOCTAE 


7F28 


9D 


17 


7D 




STAX 


LOCTAE+1 



GflQaa® 
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7F2E 


A9 


7D 




LDAIM 


LOWPAGE 


7F2D 


85 


41 




STAZ 


A3K 


7F2F 


El 


40 




LDAIY 


A3L 


7F31 


91 


3E 




STAIY 


A2L 


7F33 


4C 


69 


FF 


JMP 


KON 



HI ADDF FOR ETE 
HOLD FOR ADDRESSING 
GET OPCODE OUT OF ETE 

AND PUT BACK INTO ORIGINAL INST 
=>ALL DONE. 



***************************************************************** 

* INITIALIZATION CODE. ENTERED AT START ADDR TO INITIALIZE. 

* IT CLEARS LOCTAP, SETS UP THE Yc AND 'COUT' EXITS. 

* 

* AFTER EVERY 'RESET', MUST RESETUP KITH * Yc I . 
***************************************************************** 



7F36 


A9 


4C 




INI 


TX 


LDAIM 


X'4C" 


JMP OPCODE 


7F38 


8D 


F8 


03 






STA 


X'3F8' 


STUFF IN Yc EXIT LOC 


7F3B 


A9 


7D 








LDAIM 


KEY IN/2 5 6 


KEYIN: HI ADDRESS 


7F3D 


8D 


FA 


03 






STA 


X'3FA' 


STUFF INTO Jf'P 


7F40 


A9 


E0 








LDAIM 


KEYIN&X'FF' 


KEYIN: LO ADDRESS 


7F42 


8D 


F9 


03 






STA 


X'3F9' 


STUFF INTO JMP ADDRESS 


7F4 5 


A9 


00 








LDAIM 







7F47 


A2 


-0F 








LDXIM 


15 


INDEX TO LOCTAB END 


7F49 


9D 


16 


7D 


INI 


T00 


STAX 


LOCTAB 


CLEAR IT OUT 


7F4C 


CA 










DEX 




SO THERE ARE 


7F4D 


10 


FA 




* 




EFL 


INIT00 


NO BREAKPOINTS 










* _ 

* 





ENTER HERE 


AFTER HITTING 


'RESET' KEY, PLEASE * 


7F4F 


A9 


A5 




CMDINIT 


LDAIM 


EREAK&255 


EREAK: LO ADDRESS 


VF'51 


8 5 


36 








STAZ 


CSKL 


STUFF INTO 'COUT' EXIT 


7F53 


A9 


7D 








LDAIM 


EREAK/256 


EREAK: HI ADDRESS 


7F55 


85 


37 








STAZ 


CSWH 


STUFF INTO 'COUT' EXIT 


7F57 


4C 


69 


FF 






JMP 
END 


MCN 


INIT DONE: EACK TO MOM 



HOOK 



HOOK 



Table 1 - BREAKER Command Summary 

Command Function 

aaaa Yc A Add breakpoint at location aaaa. 
Won't allow you to add one over 
an already existing breakpoint. 
Maximum of 8 breakpoints allowed. 

Yc D Display all breakpoints. 

Yc I Initialize after RESET key. Just 
sets up 'COUT' exit again without 
resetting any breakpoints. 

aaaa Yc R Remove breakpoint from location 
aaaa. Restores original opcode. 



Listing 1 - BREAKER Program for Apple II 



Notes on how to read the assembler listing: 

A few of the syntax expressions allowed by my 
time-sharing cross assembler may appear cryptic . 
Here's a key to their meanings: 

1. All HEX numbers appear as X' rather than $ 
expressions . 

2. The ampersand (4) means logical "AND" thus: 

KEYIN&X'FF' 

resolves to the low-order 8 bits of the KEYIN 
address . 





At $190 for 16K, NOBODY can beat us! 


get some core 
for 


Full instructions included. 

Now there's no excuse. 

CONTACT 


YOUR APPLE 


Microprocessor Component Specialist 

70 West Fairview 

Springfield, IL 62707 




217/529-2992 



saaaaa 
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HOS 16K RAN FOR THE APPLE II 

Allen Watson III 

430 Lake view Way 

Redwood City, CA 94062 



MOS 16K dynamic RAM is getting cheaper. At the 
time of this writing, one mail-order house is 
offering 16K bytes of RAM (eight devices) for 
$120. Apple II owners can now enhance their 
systems for less than the Apple dealers' price. 
However, there is a potential drawback to the 
purchase of your own 16K RAM chips: speed. You 
may wonder why, since the Apple's 6502 CPU is 
running at only about 1 MHz, but things aren't 
quite that simple. 

To begin with, the Apple II continually refresh- 
es its video display and dynamic RAM. It does 
this by sharing every cycle between the CPU and 
the refresh circuitry, a half-cycle for each. 
This means that the RAM is being accessed at a 
2 MHz rate. 

That doesn't sound too fast, with the slowest 
16K parts rated at 300ns access time; but you 
have to remember that the RAM chips are 16-pin 
parts by virtue of a multiplexed address bus. 
There are two address-strobe signals during each 
memory access cycle, and the access-time specif- 
ication will be met only if the delay between 
these strobe signals is within specified limits. 
In the Apple II this delay is 140ns, which is 
too long. Furthermore, the Apple II timing 
doesn't allow long enough RAS precharge or row- 
address hold time for the slow parts. Judg- 
ing by the spec sheets, 200ns parts are prefer- 
able to 250ns parts, and 300ns parts shouldn't 
be used at all. In my Apple, 300ns parts caused 
a zero to turn into a one once in a while. 



Many mail-order houses do not mention device 
speeds in their ads. The best thing to do is to 
deal only with those suppliers who specify 
speeds, but for those who didn't, the table 
below shows the codes used by some 16K dynamic 
RAM manufacturers to indicate the speeds of 
their devices. Good luck, and caveat emptor! 



SPEED CODES USED BY 16K DYNAMIC RAM MANUFACTURERS 



Access Time (ns) 



Manufacturer 


Part No. 


150 


200 


250 


300 


AMD 


9016 


-F 


-E 


-D 


-C 


Fairchild 


F16K 


-2 


-3 


-4 


-5 


Intel 


2117 


-2 


-3 


-4 




M0STEK 


4116 


-2 


-3 


-4 




Motorola 


MCM4116C 


-15 


-20 


-25 


-30 


National 


MM5290 


-2 


-3 


-4 




NEC 


/1D416 


-3 


-2 


-1 




T I 


4116 


-15 


-20 


-25 




Zilog 


Z6166 


-2 


-3 


-4 





UNPROVED STAR BATTLE SOUND EFFECTS 

William M. Shryock, Jr . 

P.O. Box 126 

Williston, ND 58801 



10 



20 



30 



40 
50 
60 

70 

80 



POKE 0,160: POKE 1,1: POKE 
2,162: POKE 3,0: POKE 4,138 
: POKE 5,24: POKE 6,233: POKE 
7,1: POKE 8,208: POKE 9,252 
: POKE 10,141 

POKE 11,48: POKE 12,192: POKE 
13,232: POKE 14,224: POKE 15 
,150: POKE 16,208: POKE 17, 
242: POKE 18,136: POKE 19,208 
: POKE 20,237: POKE 21,96 
CALL -936: VTAB 12: TAB 9: PRINT 
"STAR BATTLE SOUND EFFECTS" 

SH0TS= RND (15)+1 

LENGTH= RND (11)* 10+1 20 

POKE 1, SHOTS: POKE 15, LENGTH: 

CALL 

FOR DELAYrl TO RND (1000): NEXT 

DELAY 

GOTO 40 



This version can be used in low res. programs 
without having to reset HIMEM. Also it can all 
be loaded from BASIC. 
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PET UPDATE 



Gary A. Creighton 

625 Orange Street, No. <43 

New Haven, CT 06510 



o 



J 



I am writing this article because I'm tired of 
seeing the same rehash of pseudo-facts being re- 
peated about the PET. If I read one more time 
about the small keyboard or the RND function not 
working correctly...! As you will see, the 2001 
has an extremely well designed Interpreter which 
can be used effectively as subroutines either 
from the SYS command , or the USR command . Par- 
ameter passing will be revealed as an easy oper- 
ation , and returning USR with a value is just as 
simple. The RND function may be substituted 
with a twelve byte USR program to make it com- 
pletely random and non-repeating (as it stands, 
it repeats every 24081 times through) and I will 
show the use of negative arguments. Unfortun- 
ately, RND(O) was apparently a mis-calculation 
on Microsoft's part. They figured that ROM 
empty locations would turn out to be more random 
than the end product shows. They load non-exis- 
tent memory locations into the RND store area 
(218-222) thus causing a resulting RND value 
which fluctuates between a few different values. 
When ROM is finally installed in that area 
(36932) the RND(0) will have the dubious quality 
of being some fixed number . 

RND FUNCTION USE 

The RND function may be set at any time to exec- 
ute a known series of RND #'s by using a known 
negative argument just before RND with a posi- 
tive one. The ability to have available a known 
list of random numbers is very important in a 
lot of sciences. 

10 R=RND(-1) 

20 FOR X=1 TO 5 

30 PRINT INT(1000*RND(1)+1) , 

40 NEXT X 

Gives the sequence: 736, 355, 748, 166,629 

Since RND(-low#) gives such a small value, use 
a negative argument in the range (-1 E10 to -1 
E30) it' you need one repeatable RND number with 
a useful value, e.g., RND(-1 E20) = .811675238. 

Concerning the true random nature of RND and 
it's ability to act randomly at all times; time 
must be combined with RND. This is possible 
with a RANDOMIZE subroutine or faster still , re- 
doing RND(+) with a USR routine. 

10000 REM (RANDOMIZE) 

10010 R1=PEEK(514) : R2=PEEK(517) 

10020 POKE 220, R1 : POKE 221, R2 

10030 RETURN 

This routine may be used at program initializa- 
tion and as the program halts for an INPUT. It 
will start a new sequence of RND numbers when- 
ever called. 

When the computer does a sequence without inter- 
vention , the following USR program is suggested 
which will return a truly random number quickly; 
without repeating. 

10 REM (TRUE RND USING USR FUNCTION) 

20 POKE 134,214 : POKE 135,31 : CLR 

30 FOR X=8150 TO 81 65 

40 READ BYTE : POKE X, BYTE 



50 NEXT X 

60 DATA 173,2,2,133,220,173,5,2,133,221,76 

65 DATA 69,223,0,0,0 

70 POKE 1,- 214 : POKE 2, 31 



MACHINE LANGUAGE STORING IN BASIC 

When using machine language, always precede 
storing by setting up BASIC'S upper boundary. 
This is done by: 

POKE 134, ITEM : POKE 135, PAGE : CLR 
e.g. POKE T34, : POKE 135, 25 : CLR 
sets upper boundary to 6400 and BASIC use will 
be confined to 1024 to 6399 unless reset or 
turned off. 

You can use the following program for storing 
decimal. Changing INDEX to 10000 to appropriate 
position and typing in DATA lines in 100 to 
9997. 

REM ("MACHINE STORE") 

1 REM WRITTEN BY GARY A. CREIGHTON, JULY 78 

2 REM ( SET INDEX=0RIGIN IN LINE 10000 ) 
1: 

15 REM FIX UPPER STRING BOUNDARY 

20 G0SUB 10000 

25 X=INDEX / 256 

30 PAGE=INT(X) 

35 ITEM=(X-PAGE)» 256 

40 POKE 134, ITEM 

45 POKE 135, PAGE 

50 CLR 

55 : 

60 REM LOAD MACHINE LANGUAGE 

65 G0SUB 10000 : L0C=INDEX 

70 READ BYTE : IF BYTE<0 THEN END 

75 POKE L0C, BYTE 

80 L0C=L0C+1 : GOTO 70 

85 : 

90 REM MACHINE LANGUAGE DATA 

100 DATA 



9997 DATA 

9998 DATA 0,0,0,-1 

9999 : 

10000 INDEX=(START OF MACHINE LANGUAGE) 
10010 RETURN 



USR PARAMETER PASSING 

The following are parameter passing rules for 
the USR function and should be added to the 
"MACHINE STORE" program. 

REM ("USR(0 TO 255)") 

46 POKE 1 , ITEM 

48 POKE 2, PAGE 

100 REM (USR INPUT 0-255; OUTPUT 0-255) 

110 DATA 32,121,214 : REM JSR 54905 

120 DATA (Your program using input value) 



5000 DATA (Setup output value in Accum.) 
5010 DATA 76,245,214 : REM JMP 55029 
10000 INDEX 6400 



GQQQQ® 
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OR 



REM ("USR(0 TO 65535)") 
46 POKE 1 , ITEM 
48 POKE 2, PAGE 

100 REM (USR INPUT 0-65535; OUTPUT 0-65535) 
110 DATA 32,208,214 : REM JSR 54992 
(Note: Check if 0-65535- RTS with: 

Y and M(8)= ITEM 

A and M(9)= PAGE 
120 DATA (Your program using 2 byte passed 
val ue ) 



5000 DATA (Setup output vlaue ITEM in Y; 

PAGE in A) 

5010 DATA 132,178 : REM STYZ 178 

5020 DATA 133,177 : REM STAZ 177 

5030 DATA 162,144 : REM LDXIM 144 

5040 DATA 56 : REM SEC 

5050 DATA 76,27,219 : REM JMP 56091 
(Setup output value and RTS) 



The input parameter may be any complex express- 
ion and you can of course : 

input 0-255 and output 0-65535, or 
input 0-65535 and output 0-255. 



SAVE MACHINE LANGUAGE AND LOAD DIRECTLY 

The reason for the 0,0,0 at the end of the pre- 
ceding machine language programs is that the 
saving routine described next SAVES machine 
language until 0,0,0 or an ERROR is printed. 
After it has been saved in this way, it may be 
LOADED and VERIFIED with little effort. 

Add to "MACHINE STORE" program (all assembly is 
in decimal ) . 



OVER 



0VR2 



0VR3 
AGAIN 



0VP.4 



REM ( " 
100 REM 
110 DATA 
120 DATA 
130 DATA 
140 DATA 
150 DATA 
160 DATA 
170 DATA 
180 DATA 
190 DATA 
200 DATA 
210 DATA 
220 DATA 
230 DATA 
240 DATA 
250 DATA 
260 DATA 
270 DATA 
280 DATA 
290 DATA 
300 DATA 
310 DATA 
320 DATA 
330 DATA 
340 DATA 
350 DATA 
360 DATA 
370 DATA 
380 DATA 
390 DATA 
400 DATA 
410 DATA 
420 DATA 
430 DATA 
440 DATA 
450 DATA 
460 DATA 
470 DATA 
480 DATA 
DATA 
DATA 



SAVEM") 
ERAM=31 (or 

32,200,0 

208,3 

76, 158,246 

32,17,206 

32,164,204 

32,208,214 

132,247 

133,248 

170 

152 

208,1 

202 

136 

132,80 

134,81 

169,173 

133,79 

169,96 

133,82 

32,200,0 

201 ,44 

208,3 

32,194,0 

32,51,244 

230,80 

208,2 

230,81 

32,79,0 

208,27 

160,1 

177,80 

208,21 

200 

177,80 

208,16 



490 
460 
470 DATA 



480 
490 



DATA 
DATA 



500 DATA 

510 DATA 

520 DATA 

530 DATA 



last page of 
REM JSR 
REM BNE 
REM 
REM 
REM 
REM 
REM 
REM 



24 

165,80 

105,4 

133,299 

165,81 

105,0 

133,230 

76,177,246 



REM 
REM 
REM 
REM 
REM 
REM 
REM 



REM 
REM 
REM 
REM 
REM 



REM 
REM 



JMP 
JSR 

JSR 
JSR 
SYTZ 
STAZ 



RAM on 
200 
OVER 
63134 
52753 
52388 
54992 
247 
248 



your PET) 
check if : or end of line 

jump 'SAVE' if SYS 8000 only 

check if ' ,' 

analyze arithmetical argument 

check if 0-65535 

'save from' item 

'save from' page 



REM TAX 

REM TYA 

REM BNE 

REM DEX 



0VR2 



DEY 

STYZ 

STXZ 

LDAIM 

STAZ 

LDAIM 

STAZ 



REM JSR 

REM CMPIM 

REM BNE 

REM JSR 



JSR 

INCZ 

BNE 

INCZ 

JSR 



REM BNE 

REM LDYIM 

REM LDAIY 

REM BNE 



80 

81 

173 

79 

96 

82 

200 

44 

0VR3 

194 

62515 

80 

0VR4 

81 

79 

CHEND 

1 

80 

CHEND 



INY 
LDAIY 



REM BNE 



24 

165,80 

105,4 

13 
REM 
REM 
REM 
REM 
REM 
REM 
REM 



REM 
REM 
REM 

CLC 

LDAZ 

ADCIM 

STAZ 

LDAZ 

ADCIM 

STAZ 



REM JMP 



CHEND 
CLC 
LDAZ 
ADCIM 



4 

229 

81 



230 

63153 



back up 1 

initialize CHK pointer item 

initialize CHK pointer page 

LDA instruction in 0079 

RTS instruction in 82 

check if ' , ' before filename 

move code pointer over ' , ' 
get options for "SAVE' 



add 1 to CHK pointer 
look at next CHK code 

check for 0,0,0 



80 
4 



'save to' item 



'save to' page 
complete 'SAVE' 
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CHEND 540 DATA 165, 81 
550 DATA 201,31 
560 DATA 240,10 
570 DATA 144,210 
580 DATA 32,184,31 
590 DATA 162,85 
600 DATA 76,108,195 

CHKNF 610 DATA 165, 80 
620 DATA 201,253 
630 DATA 144,196 
640 DATA 32,184,31 
650 DATA 160,40 
660 DATA 76,133,245 

END 670 DATA 169,13 

680 DATA 32,234,227 
690 DATA 169,63 
700 DATA 32,234,227 
710 DATA 169,69 
720 DATA 32,234,227 
730 DATA 169,78 
740 DATA 32,234,227 
750 DATA 169,68 
760 DATA 32,234,227 
770 DATA 96 
780 REM (FORMAT: SYS 



REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 



LDAZ 81 

CMPIM ERAM 

BEQ 

BCC 

JSR 



CHKNF 
AGAIN 
END 



LDXIM 85 



JMP 
LDAZ 



70028 
80 



CMPIM 253 



BCC 
JRS 



AGAIN 
END 



LDYIM 40 



JMP 

LDAIM 

JSR 



62853 

13 

58346 



LDAIM 63 
JSR 58346 
LDAIM 69 
JSR 58346 
LDAIM 78 
JSR 58346 
LDAIM 68 



JSR 
RTS 



check: 'not found' if last 
look at next if less than 



("?END) NOT FOUND ERROR" 



again if enough room 



("?END) NOT FOUND ERROR" 



58346 "?END" 



8000 , INDEX , "FILENAME" , DEVICE# , I/O OPTION) 



o 



After typing and saving normally, type RUN when 
READY. Save "SAVEM" using itself to save itself 
by typing: 

SYS 8000,8000, "SAVE(SYS 8000)" 

when READY., REWIND TAPE #1 and type: 

VERIFY "SAVE(SYS 8000)" 



MACHINE LANGUAGE LOAD PROCEDURE 

After SAVEing machine language , you have the 
capability of LOADing directly if you follow 
these rules. 



Loading machine language before BASIC program: 

LOAD "machine language name" 

NEW 

A= PEEK (247) :B= PEEK (248) 

POKE 134, A :P0KE 135, B 

POKE 1,A :P0KE 2,B (only if USR, not SYS) 

CLR 

Then LOAD BASIC Program. 

Loading machine language from BASIC program: 



IF OK THEN RUN 6 

1 0K=-1 : PRINT "PRESS REWIND ON TAPE #1" 

2 WAIT 519,4,4 : REM wait til stop if play down but not motor 

3 WAIT 59411,8,8 : REM wait til key on cassette pushed 

4 WAIT 59411,8 : REM wait til stop on cassette pushed 

5 LOAD "machine language name" 

6 A=PEEK(247) : B=PEEK(248) 

7 POKE 134, A : POKE 135, B 

8 POKE 1,A : POKE 2,B : REM (only if USR, not SYS) 

9 CLR 

10 REM (BEGIN BASIC PROGRAM, MACHINE LANGUAGE LOADED) 
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THE ULTIMATE FOR PET — 



FLOPPY DISK CONTROLLER 



The EXS100 is both a S100 ADAPTER and a FLOPPY DISK CONTROLLER on a single board 

The EXSIOO can be used to interface the PET* to the S100 BUS, making available the seeming].;.' 
infinite amount of S100 accessories using the PET memory expansion connector. 

The EXSIGO board has a complete FLOPPY DOSK CONTROLLER on-board all set up ready to control 
up to three mini-floppy disks. 

ASSEMBLED TESTED 



SIOO ADAPTER - & 1S5 - 

The EXSIOO board built as a stand alone S100 BUS Adapter. (Floppy Disk Controller parts missing) 
Ready to plug into any S100 mainframe to expand the PET . 

FLOPPY DISK PACKAGE - $ 635 - 

The EXSIOO board-, cable to the PET, SAi*00 MINI-FLOPPY DISK DRIVE, Power Supply, and Cabinet.. 

A Disk System all ready to go, a disk system that can be later expanded into a full S100 Mainframe- 

SIOO MAINFRAME, DISK -$ 990 - 

The EXSIOO board installed in a CGRS S100 Mainframe. Complete idth S100 Pover Supply, and 



a SAUOO MINI-FLOPPY DISK DRIVE installed in the cabinet. This system is not only a Disk CGRS IVIICH^* I t~ CT *H 

P.O. BOX 366 
Southampton, Pa. 18966 



Systein but a complete S100 Mainframe ready to accept more RAM, ROM, Printer , the works. 



* TRADEMARK OF COMMODORE 
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SUBSCRIPTION AND RENEWAL INFORMATION 



If you are a subscriber to MICRO, then the code 
following your name on the mailing label is the 
number of the last issue your current subscrip- 
tion covers. If your code is 07, then this is 
your last issue. MICRO will NOT send out 
renewal notices. So, if your number is coming 
up, get your subscription renewal in soon, and, 
please check your label for correct address and 
notify us of any corrections or changes. 

MICRO is currently published bi-monthly. The 
first issue was OCT/NOV 1977- The single copy 
price is $1.50. Subscriptions are $6.00 for six 
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6502 INTERFACING FOR BEGINNERS; 
THE CONTROL SIGNALS 
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Pt. Lookout, MO 65726 
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By now your breadboard should look like a rat's 
nest so we shall add just a few more wires. So 
far you have used several decoding chips to pro- 
duce device select pulses (also called chip sel- 
ects, port selects, etc.) These pulses activate 
a particular I/O port, memory chip, PIA device, 
interval timer or another microcomputer compon- 
ent. Almost all of these components must "know" 
more than that they have been addressed . They 
must know if the microprocessor is going to READ 
data from them or WRITE to them. The R/W con- 
trol line coming from the R/W pin on the 6502 
provides this information . It is at logic 1 for 
a READ (typically LDA XXXX) and at logic for 
a WRITE (typically STA XXXX). 

If you have ever tried to wrap your mind around 
timing diagrams for microcomputer systems you 
soon realize that system timing is also import- 
ant. Suppose that a memory chip is selected by 
a device select pulse. A 21L02 chip, after 
being selected, must decode the lowest 10 add- 
ress lines itself to decide which of its 1024 
flip-flops will become the output data. This 
takes time, so the data at the output pin is not 
ready instantaneously. The 6502 simply waits 
for a specified amount of time, and at the end 
of this period it reads the information on the 
data bus. If the access time of the chip is too 
long, the 6502 will read garbage; otherwise it 
will get valid data. 

Likewise, during a WRITE cycle, the microproces- 
sor brings the R/W line to logic 0, selects the 
device which is to receive the data, and at the 
end of a cycle it signals the divice to read the 
data which the 6502 has put on the data bus . 
The signal which successfully concludes both a 
READ and a WRITE instruction is the so-called 
phase-two clock signal symbolized by t . In 
particular, it is the trailing edge (positive to 
zero transition) of this signal which is used. 

All the timing for the microcomputer is done by 
the crystal oscillator on the microcomputer 
board and the clock circuitry on the micropro- 
cessor itself. A clock frequency of 1 MHz pro- 
duces a machine cycle of 1 microsecond in dura- 
tion. Near the beginning of the cycle the ad- 
dress lines change to select the divice which 
was addressed , and the R/W goes to logic 1 or 
logic depending on whether a READ or a WRITE 
was requested. If a READ was requested, some 
device in the system responds by putting data on 
the data bus. Typically this happens during the 
second half of the cycle when 0» is at logic 1 . 
Finally, at the end of the cycle, but before the 
address lines or the R/W line have changed , t 
changes from logic 1 to logic 0, clocking the 
data into the 6502. The same kinds of things 
happen during a WRITE cycle , except that now the 
external device uses the trailing edge of the 0t 
signal to clock the data, while the 6502 puts 
the data on the bus at a slightly earlier time 
in the cycle. For details refer to the 6502 
HARDWARE MANUAL. 

The circuits you have built so far, together 
with a few more chips, will demonstrate the eff- 
ect of the control signals. Refer to Figure 1 
of the last installment of this column (MICRO, 
Issue 6, p. 30), and to Figure 1 of this issue. 
You will see the LS145 and the LS138 have not 
been changed too much, in fact all of the conn- 
ections to the LS145 should stay the same. The 
device select pulse from the LS145 goes to G2A 



as before, but another signal goes to G2B in the 
new Figure 1. For the moment disregard the low- 
er LS138 and LS367 in Figure 1 of this issue. 
The new signal to G2B of the LS138 is our W RITE 
signal . It is produced by NANDING the "r7W sig- 
nal with Ojl and it is an active-low signal . On 
the KIM-1 it is called RAM-R/W and is available 
on the expansion connector. Most other 6502 
systems will very likely also have a RAM-R/W 
signal . 

Its effect in Figure 1 is to inhibit the device 
select pulse from the LS138 whenever the R/W 
line is high (during all READ instructions) , 
but to a:.low the device select pulse to occur 
when the R/W line is low and Q t is high. Thus, 
the top LS138 in Figure 1 selects output ports 
only, and the device select pulse from it term- 
inates on the trailing ed«e of the 0*, producing 
a logic to logic 1 transition simultaneously 
(almost) with 4 . This pulse is inverted by the 
LS04. Consequently, a WRITE instruction pro- 
duces a positive pulse at the G inputs of the 
LS75 whose duration is about 1/2 microsecond and 
whose trailing edge coincides with Z . 

The 74LS75 is a 4-bit bistable latch whose Q 
outputs follow the D (data) inputs only when the 
G inputs are at logic 1 , in other words during 
the device select pulse from the LS04 inverter. 
The trailing edge of this pulse latches the Q 
outputs to the value of the D inputs during the 
device select pulse. If you had a great deal of 
trouble following this, you may want to check 
the reverse side of this page to make sure there 
is nothing valuable on it and then destroy this 
by burning or shredding! Otherwise proceed to 
to the experiment below. 

Connect the circuit shown in Figure 1 , omitting 
for the time being the lower LS138 and the 
LS367. You can also omit the connection of add- 
ress line A3 to G1 on the top LS138 if G1 is 
connected to +5V as was indicated in the last 
issue. In other words, simply add the LS04 and 
the LS75 to your circuit of the last issue. The 
RAM-R/W signal must also be generated if your 
6502 board does not have one. Simply use one 
inve rter on the LS04 to invert the R/W signal to 
R/W, then NAND it with the , and run the out- 
put of the NAND gate to the G2B pin on the LS138. 

The address of the device is 800F if the connec- 
tions are made as shown in the figure. If other 
pins on either the LS145 and/or the LS138 are 
changed the address will be different. The 
switches shown connected to the D inputs may be 
implemented with a DIP switch or jumper wires. 
An open switch corresponds to a logic 1 while a 
closed switch is logic 0. Set the 4 switches to 
any combination then load and run the following 
program : 

0200 8D OF 80 STA DSF. 

The LEDs should indicate the state of the 
switches. If you add the statements 



0203 4C 00 02 



JMP START 



then you should be able to change the switches 
and the LEDs will follow the switches. Try sub- 
stituting an AD OF 80 (LDA DSF) for the 8D OF 80 
instruction. Nothing should happen, even though 
the same address is being selected , because on 
LDA instruction the R/W line is high, inhibiting 
the LS138 from producing a device select. Fin- 
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ally, connect the data lines DO-3 from the 6502 
to the D-inputs of the LS75, making very sure 
that the LS145 is de-selecting other locat- 
ions. On the KIM-1 this means that pin 1 of the 
LS145 is connected to pin K on the application 
connector and pin 9 of the LS 145 is connected 
to pin J. The appropriate pull-up resistors 
must also be added. With the data lines conne- 
cted run the following program: 

0200 A9 04 LDAIM $04 
0202 8D OF 80 STA DSF. 

Play around with different numbers in LDAIM ins- 
truction and explain your results. If nothing 
seems to make sense , it may be that your data 
lines need to be buffered, a topic we will take 
up next issue. If your results make sense you 
will have discovered that we have configured a 
4-bit output port whose address is 800F. Adding 
another LS75 to connect to data lines D4-D7 and 
whose G connections also go to the output of the 
LS04 will give an 8-bit output port. Seven 
other output ports, addresses 8008 through 800E, 
could be added using the other device select 
signals from the LS138, LS04 inverters, and LS75 
latches. 

If you want to make an input port wire the cir- 
cuit for the lower LS138 in Figure 1. If you 



don't have much more room on your circuit board 
you might want to simply reconnect the upper LS- 
138 to become the lower LS138. A couple of con- 
nections do the trick. Set the switches to any- 
thing you like and run the program below. 



KIM-1 users should see the hex equivalent of the 
switch settings appear in the right-most digit 
on the display. Owners of other systems can 
omit the last two lines of the program, stop it, 
and examine the location 00F9 to see that the 
lowest four bits agree with the switch settings. 
Experiment with other switch settings to make 
sure that everything is operating correctly. 

The completed circuit of Figure 1 gives one 4- 
bit output port (provided the data lines are 
connected to the D inputs of the LS 75) and one 
4-bit input port, addresses 800F and 8007 resp- 
ectively. These two ports are easily expanded 
(two more chips) to become 8-bit ports. Like- 
wise the circuit of Figure 1 could be expanded 
to give a total of eight 8-bit input ports and 
eight 8-bit output ports. 



Next issue we will look at a slightly different 
input port , and we will look in more detail into 
three-state devices and the data bus . You may 
want to keep your circuit together until then. 



0200 AD 07 80 

0203 85 F9 

0205 20 1F 1F 

0208 4C 00 02 



START LDA DS7 Read input port data 

STA DISP and store it in location 00F9 . 

JSR SCANDS Jump to KIM display subroutine. 

JMP START Repeat program. 



Q+5V 



Aot>~ 



Al >- 



OUTPUT PORT 




Figure 1 . A four-bit input port and output 
port interface for the 6502. 
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650X OPCODE SEQUENCE MATCHER 

3. 5. Green 

807 Bridge Street 

Bethlehem, PA 18018 



The motivation for writing this program stemmed 
from the fact that I have two machine code ver- 
sions of the same 650X assembler ( ASM65 by Wayne 
Wall, dated 1 May 77 and 13 Jun 77 respectively) 
but I only have a listing of the older version. 
Both are just short of 4 K bytes long. I wished 
to make some local changes to the newer version 
and therefore needed to establish a means of 
correspondence between it and the listing. A 
disassembler is helpful here but not adequate 
because of discontinuities in the two codes 
which make forward references very difficult to 
correlate manually. 

I felt that when a program has been heavily mod- 
ified , many opcode sequence segments whould rem- 
ain constant even while their respective oper- 
ands differ. Therefore, what was needed was a 
program that would correlate and point to par- 
allel sequences of opcodes. 

Several assumptions were made in order to sim- 
plify the programming task. It was presumed 
that the basic order of appearance of major por- 
tions of the code would be the same since there 
seemed to be little advantage in shuffling the 
deck, as it were. Also, in order to minimize 
the effect of spurious matches, it was decided 
that only significant sequences need be reported 
and that no portion of the code would be report- 
ed as a match more than once. This position 
saves the program, for example, from reporting 
every possible LDA,STA opcode sequence pairing 
(or even all of those of the same address mode). 

Process Description 

As written, the scanning process of the matching 
program starts at the beginning of the two code 
strings, A and B, to be examined. Both initial 
positions are assumed to contian opcodes. An in- 
dex or pointer to the B string is, in effect, 
moved along B, from opcode to opcode, until a 
match with the current A string opcode is found . 
If no match is found before the B list is ex- 
hausted , the A pointer is moved to the next A 
opcode position while the B pointer is reset to 
its previous starting point. This general proce- 
dure is repeated until the A list is exhausted, 
at which time the program terminates. 

When a match is found , both pointers are moved 
together along their respective lists, from 
opcode to opcode, until the opcodes fail to 
match each other. If the matching sequence 
is significantly long the size and the start 
and end of both segments is displayed. The 
search for additional matching segments is res- 
umed from the end of the just-reported segments 
so that their opcode elements cannot be matched 
more than once. 

If the completed sequence is not significant, it 
is not displayed and the search is resumed from 
where the short sequence began, as if there 
had been no match at all . 

The definition of significance refers to the 
minimum acceptable number of matching codes in a 
continuous sequence. The particular values used 
are left to the user. While our experience has 
shown a minimum value of eight to be useful, the 
actual values should reflect the length of the 
code being examined and the degree to which it 
has been hacked up. 

The effect of a too-low significance value often 
results in a fewer number of matches being rep- 



orted, rather than more as one might expect. 
This is because a spurious match of short segm- 
ents can have the effect of masking out longer 
possible matches which would use the same code 
items were they still available. 

Operation 

To operate the opcode matching program both 
lists of code must be in memory. They may be in 
ROM. They need not be at their operating addr- 
ess. (Indeed, if they have the same address at 
least one must be somewhere else anyway) . Since 
the matching program reports storage , rather 
than operating addresses it is useful to choose 
storage addresses that have some degree of corr- 
espondence to the operating addresses, e.g., 
code operating at $21E3 might be stored at 
$41E3. 

Enter initial values (all in hex L0,HI) as fol- 
lows : 

$0000,01 Significance value 

$0002,03 Start of list A 

$0004,05 Start of list B 

$0006,07 End of list A 

$0008,09 End of list B 

Only the starting address will be modified dur- 
ing program execution. The program will init- 
ially assume that the value at the start locat- 
ion is an opcode . 

To run the program enter at OPMACH. As written, 
it will terminate by jumping to the monitor from 
END01 . The routine may be made into a subrout- 
ine by placing an RTS here. 

Since the program cranks the data a lot , there 
will be what seem to be long pauses between out- 
puts. The program requires about 2 minutes to 
compare the aforementioned assemblers. 

Results 

Several sets of results, using significance val- 
ues of $06, $08 and $0A are shown below. In ord- 
er to have both versions of code resident at the 
same time , it was necessary to store one ver- 
sion , at address $4000. 

About 64 percent of the code of the two versions 
of the assembler correlate when a significance 
value of 8 is used. This is a reasonable per- 
centage when one considers the fact that the 
non-significant , non-reported , sequences are 
easily identified since they lie in the same 
relative position between reported sequences. 

An extensive manual comparison of the two code 
sets was made. (So much for the work-saving as- 
pects of the program!) No false matches were 
identified when a significance value of 8 was 
used . 

Variations for Text Processing 

Interesting variants of the program are pos- 
sible. By altering or replacing the list point- 
er increment routines, AINC and BINC, the nature 
of the list pointer incrementation may be chang- 
ed from the current conditional increment based 
on opcode to some other condition or to a con- 
stant such as plus one. 

With a constant increment of one , the matching 
program may be used to compare sequences of any 
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textural material in a somewhat crude , one for 
one fashion . 

By having separate increment subroutines when 
seeking to locate the start of a matching seg- 
ment in contrast to the incremental routines 
used when "running-out" a sequence, some fairly 
powerful text processing capabilities may be ob- 
tained at little additional cost. For example, 
when seeking to locate matching segments in nat- 
ural language text , we might wish to start with 
the initial character of alphabetic strings, 
i.e., words. Therefore, by incrementing past 
all non-alphabetic characters to the next alpha- 
betic character we can both speed up the process 
and insure that our sequences start with (what 
we have operationally defined as) words. 

Similar techniques may be employed in the (now 



separate) within sequence increment routines to 
ingore , (i .e. , increment past ,") any non-alphabet- 
ic characters such as control characters, num- 
bers, punctuation or whatever we like. Thus we 
are able to obtain a far more flexible and hope- 
fully more useful definition of a matching seq- 
uence. 

Conclusions 

The general techniques illustrated here are both 
effective and useful. The conditional matching 
approach has not been fully explored , but it is 
clear that it has interesting possibilities in 
the area of text processing. In the present 
application, correlating two lenghty strings of 
machine code, the approach made practical what 
otherwise would have been a difficult and dull 
task. 



**** OPCODE SEQUENCE MATCHER ***' 
VERSION 1.04. 18 AUG 78 

COPYRIGHT, 1978 

COMMERCIAL RIGHTS RESERVED 

EXCEPT AS NOTED BY 



J. S. GREEN . COMPUTER SYSTEMS 
807 BRIDGE STREET 
BETHLEHEM. PA 18018 
(215) 867-0924 

NOTE: THE BYTCNT SUBROUTINE IS FROM 

H. T. GORDON IN DDJ . #22 P. 5. 

(COPYRIGHT BY PEOPLE'S COMPUTER COMPANY) 



.LOC 50000 



0000 00 00 

0002 00 00 

0004 00 00 

0006 00 00 

0008 00 00 



SIGNIF: 

ABASE: 

BBASE: 

AMAX: 

BMAX: 



USER DEFINED 

.WORD 

.WORD 

.WORD 

-WORD 

.WORD 



VARIABLES (LO,HI) 

SIGNIFICANCE 

START OF LIST 

START OF LIST 

END OF LIST A 

END OF LIST B 



OTHER PROGRAM VARIABLES 



000A 00 00 
000C 00 00 
000E 00 00 
0010 00 00 
0012 00 00 



APOINT 

BPOINT 

ASAVE 

BSAVE 

COUNT 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



LIST A POINTER 

LIST B POINTER 

LIST A SEQUENCE START 

LIST B SEQUENCE START 

SEQUENCE COUNTER 



EXTERNAL SUBROUTINES (IN KIM) 



.DEF START=?1C4F 

.DEF CRLF=51E2F 

.DEF OUTCH=?lEA0 

.DEF PRTBYT=$1E3B 

.DEF OUTSP=$lE9E 



; MONITOR RETURN POINT 
; CARRIAGE RETURN 
;DIS?LA A CHAR 
;DISPLA HEX BYTE 
;DISPLA A SPACE 



.LOC 502t 



0200 20 2F IE 

0203 A2 29 

0205 BD 4F 03 

0208 20 A0 IE 

020B CA 

020C 10 F7 

020E A5 01 

0210 20 3B IE 

0213 A5 00 

0215 20 3B IE 

0218 20 2F IE 

0213 20 38 03 



OPMACH: 


JSR 


CRLF 




LDXf 


$29 


0PMCH1: 


LDAX 


SIGN 




JSR 


DUTCH 




DEX 






BPL 


0PMCH1 




LDA 


SIGNIF+1 




JSR 


PRTBYT 




LDA 


SIGNIF 




JSR 


PRTBYT 




JSR 


CRLF 




JSR 


3ASPNT 



;SIGN + HEADER COUNT 
;DISPLAY HEADER 



;DISPLAY SIGNIF HI 
; DISPLAY SIGNIF LO 
;POINTERS=3ASES 
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n 







j 



021E 
0220 
0222 
0224 
0226 
0228 
022A 
022D 
022F 
0231 
0233 
0235 
0237 
0239 
023B 
023D 
023F 
0240 
0242 
0244 
0246 
0248 
024A 
024C 
024E 
0250 
0252 
0254 
0256 
0258 
025A 
025C 
025E 
0260 
0262 
0265 
0268 
026A 
026C 
026E 
0270 
0271 
0273 
0275 
0277 
0279 
027B 
027D 
0280 
0283 
0286 
0288 
028B 
028D 
28F 
0291 
29 3 
0296 
0299 
029C 
29D 
029F 
2A1 
2A3 
2A5 
02A7 
2A.9 
02AC 
2AF 
02B1 
02B4 
02B7 



A5 
C5 
30 
A 5 
C5 
30 
4C 
A2 
Al 
CI 
D0 
86 
86 
A2 
B5 
95 
CA 
10 
A2 
Al 
CI 
D0 
A5 
C5 
30 
A5 
C5 
10 
A5 
C5 
30 
A5 
C5 
10 
20 
20 
E6 
D0 
E6 
D0 
EA 
A5 
C5 
30 
A5 
C5 
30 
20 
2 
4C 
A2 
20 
A5 
85 
A5 
85 
20 
4C 
2 
£A 
A5 
C5 
30 
A5 
C5 
30 
20 
20 
A 2 
2 
4C 
4C 



03 
07 
09 
02 
06 
03 
B7 
00 
0A 
0C 
64 
12 
13 
03 
0A 
0E 

F9 
00 
0A 
0C 
26 
0B 
07 
06 
0A 
06 
1A 
0D 
09 
06 

ac 

08 
3E 
BA 
CE 
12 
D6 
13 
D2 

13 
01 
0F 
12 

00 

09 

FE 
45 
96 
01 
3D 
10 
0C 
11 
0D 
CE 
9C 
CE 

0D 
09 
11 
'SC 
08 
0B 
3B 
BA 
01 
47 
IE 
4F 



DOl : 



02 



02 
02 



02 

03 
02 

03 



02 
02 
02 



IF1: 



THENl: 



THN1A: 



D02: 



EXP21: 



EXP22; 



EN DO 2 : 
IF2: 



THEN 2 : 



ELS2: 



ENDIF2: 
ELS1: 
ENDIF1: 
IF3: 



03 
02 

03 
02 

1C 



THEN 3: 



ENDIF3: 
ENDOl: 



LDA 

CMP 

BMI 

LDA 

CMP 

BMI 

JMP 

LDX# 

LDAXi§ 

CMPX(§ 

3NE 

STX 

STX 

LDX# 

LDAX 

STAX 

DEX 

BPL 

LDX# 

LDAX 9 

CMPX@ 

BNE 

LDA 

CMP 

BMI 

LDA 

CMP 

BPL 

LDA 

CMP 

BMI 

LDA 

CMP 

BPL 

JSR 

JSR 

INC 

BNE 

INC 

BNE 

NOP 

LDA 

CMP 

BMI 

LDA 

CMP 

BMI 

JSR 

JSR 

JMP 

LDX# 

JSR 

LDA 

STA 

LDA 

STA 

JSR 

JMP 

JSR 

NOP 

LDA 

CMP 

BMI 

LDA 

CMP 

BMI 

JSR 

JSR 

LDX# 

JSR 

JMP 

JMP 



ABASE+1 

AMAX+1 

IF1 

ABASE 

AMAX 

IF1 

ENDOl 



APOINT 

BPOINT 

ELS1 

COUNT 

COUNT+1 

3 

APOINT 

ASAVE 

THN1A 



APOINT 

BPOINT 

END02 

APOINT+1 

AMAX+1 

EXP21 

APOINT 

AMAX 

END02 

BPOINT+1 

BMAX+1 

EXP22 

BPOINT 

BMAX 

END02 

AINC 

BINC 

COUNT 

DO 2 

COUNT+1 

DO 2 

COUNT+1 

SIGNIF+1 

ELS2 

COUNT 

SIGNIF 

ELS2 

REPORT 

PNTBAS 

ENDIF2 

1 

BASPTl 

BSAVE 

BPOINT 

BSAVE+1 

BPOINT+1 

BINC 

ENDIF1 

BINC 

BPOINT+1 

BMAX+1 

ENDIF3 

BPOINT 

BMAX 

ENDIF3 

BASPNT 

AINC 

1 

PNTBS1 

DOl 

START 



;3R IF WHOLE JOB NOT DONE 



BR IF WHOLE JOB NOT DONE 
HERE IF WHOLE JOB DONE 
DOES CURRENT PAIR MATCH- 



;BR IF NOT THE SAME 
;HERE ON SAME 
;CLEAR THE COUNTER 

;SAVES=POINTERS 



;DO TILL NOT THE SAME 



;BR IF NOT THE SAME 



;BR IF LESS THAN 



;BR TO ENDO 



;BR IF LESS THAN 



;BR TO ENDO IF LIMIT REACHED 
;MOVE A POINTER TO NEXT A OPCODE 
;MOVE B POINTER TO NEXT B OPCODE 



;BR ALWAYS TO TOP OF DO 

;A WASTED BYTE FOR "STRUCTURE' 



;BR IF NOT SIGNIF 



;HERE ON SIGNIF. OUTPUT RESULT 
;POINTERS=BASES' 



;APOINT=ABASE 



; ANOTHER SOP TO "STRUCTURE' 



;BR IF NOT DONE 



;BR IF NOT DONE 
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2BA 


A2 


00 


02BC 


Al 


0A 


02BE 


20 


E2 


02C1 


SA 




02C2 


18 




02C3 


65 


0A 


02C5 


85 


0A 


02C7 


A5 


0B 


02C9 


69 


00 


02CB 


85 


0B 


02CD 


60 




02CE 


A2 


00 


a 2D0 


Al 


0C 


02D2 


20 


E2 


02D5 


8A 




02D6 


18 




02D7 


65 


0C 


02D9 


85 


0C 


02DB 


A5 


0D 


2DD 


69 


00 


02DF 


85 


0D 


02E1 


60 





SUBROUTINES FOLLOW 



AINC: 



BINC: 



02 



02E2 A2 01 
02E4 2C E8 02 
02E7 D0 08 
02E9 C9 20 
02EB F0 0E 
02ED 29 9F 
02EF D0 0B 
02F1 29 15 
02F3 C9 01 
02F5 F0 05 
02F7 29 05 
02F9 F0 02 
2FB ES 
02FC E8 
2FD 6 



BYTCNT: 



HAFOP: 



THREE: 

TWO: 

ONE: 



MOVE 

LDX# 

LDAX 

JSR 

TXA 

CLC 

ADC 

ST A 

LDA 

ADC# 

ST A 

RTS 

MOVE 

LDXff 

LDAXf 

JSR 

TXA 

CLC 

ADC 

ST A 

LDA 

ADC# 

STA 

RTS 

CALC 

BY H 

LDX# 

BIT 

BNE 

CMP# 

BEQ 

AND# 

BNE 

AND# 

CMP* 

BEQ 

AND# 

BEQ 

INX 

INX 

RTS 



TO NEXT A OPCODE 



@ APOINT 
BYTCNT 



APOINT 

APOINT 

APOINT+1 



APOINT+1 



TO NEXT B OPCODE 


BPOINT 
BYTCNT 



;GET OPCODE 

;CALCULATE SIZE 

; RESULT RETURNED IN X 

;ADD RESULT TO POINTER 



;GET OPCODE 

;CALCULATE SIZE 

; RESULT RETURNED IN X 

;ADD RESULT TO POINTER 



BPOINT 

BPOINT 

BPOINT+1 



BPOINT+1 



ULATE SIZE OF OPERAND (+1) 
. T. GORDON (SEE DDJ #22. P. 



1 

BYTCNT+6 

HAFOP 

$20 

THREE 

$9F 

TWO 

$15 

1 

TWO 

5 

ONE 



TEST BIT 3 
ALL X(8-F) 

ONLY $20 
BITS 5 .6 OUT 
ALL EXCEPT (0 
RETAINS ONLY 



,4,6)0 
BITS 



X(5,B) 
BIT 4 OUT 
X ( 8 . A ) AN D 
RESID. X(9- 



( . A. , 6 ) 



02FE A2 01 
0300 B5 12 
0302 20 3B IE 

0305 CA 

0306 10 F8 

0308 20 31 03 

030B A2 00 

030D B5 0F 

030F 20 3B IE 

0312 B5 0E 

0314 20 3B IE 

0317 20 34 3 

031A B5 0B 









31C 20 3B IE 
31F B5 0A 







IE 
03 



321 20 3B 

324 20 31 

327 E8' 

328 E8 

329 E0 03 
32B 30 E0 
32D 20 2F IE 

330 60 



REPORT : 
REPTl: 



REPT2 : 



DISP 

LDX# 

LDAX 

JSR 

DEX 

BPL 

OUTP 

JSR 

LDX# 

LDAX 

JSR 

LDAX 

JSR 

JSP. 

LDAX 

JSR 

LDAX 

JSR 

JSR 

INX 

INX 

CPX# 

BMI 

JSR 

RTS 



LAY SIGNIFICANT SEQUENCE LIMITS 
1 

COUNT ; OUTPUT EXTENT OF MATCH 
PRTBYT 

REPTl 
UT MULTIPLE SPACES 

OUTSP4 ;FOUR SPACES 



A3AVE+1 

PRTBYT 

ASAVE 

PRTBYT 

OUTSP2 

APOINT+1 

PRTBYT 

APOINT 

PRTBYT 

OUTSP4 



3 

REPT2 

CRLF 



; OUTPUT START AND 
; END ADDR OF 
; BOTH SEGMENTS 



saaaao 



7:22 



0331 20 34 03 

0334 20 9E IE 

0337 20 9E IE 

033A 60 



0UTSP4: 
OUTS P 2 



JSR OUT3P2 

JSR OOTSP 

JSR OUTSP 
RTS 



;4 SPACES 
;2 SPACES 



033B A2 03 

033D B5 02 

033F 95 0A 

0341 CA 

0342 10 F9 
0344 60 



BASPNT: 
BASPT1 



MOVE ABASE & 

LDX# 3 

LDAX ABASE 

STAX APOINT 

DEX 

BPL BASPT1 

RTS 



BBASE TO APOINT & BPOINT 



0345 A2 03 

0347 B5 0A 

0349 95 02 

034B CA 

034C 10 F9 

034E 60 



PNTBAS: 
PNTBS1: 



MOVE APOINT & 

LDX# 3 

APOINT 
ABASE 



BPOINT TO ABASE & BBASE 



LDAX 

STAX 

DEX 

BPL 

RTS 



PNTBS1 



034F -20 

0350 3D 

0351 20 

0352 46 

0353 49 

0354 4E 

0355 47 

0356 49 

0357 53 

0358 20 
3359 20 



SIGN: 



.ASCII 



FINGIS 



HEADER: .ASCII 



'OT 



MORF 



OT 



MORF 



EZIS 







035A 4F 
0358 54 
035C 20 
035D 20 
035E 20 
035F 4D 

0360 4F 

0361 52 

0362 46 

0363 20 

0364 20 

0365 20 

0366 20 

0367 20 

0368 4F 

0369 54 
036A 20 
036B 20 
036C 20 
036D 4D 
036E 4F 
036F 52 

0370 46 

0371 20 

0372 20 

0373 20 

0374 20 

0375 45 

0376 5A 

0377 49 

0378 53 



, END 



0379 




6000 


SIGNIF 


0002 


ABASE 


0004 


BBASE 


0006 


AMAX 


0008 


BMAX 


000A 


APOINT 


000C 


BPOINT 


000E 


ASAVE 


0010 


BSAVE 


0012 


COUNT 


1C4F 


START 


1E2F 


CRLF 


1EA0 


OUTCfl 


1E3B 


PRTBYT 


1E9E 


OUTSP 


0200 


OPMACH 


0205 


OPMCH1 


034F 


SIGN 


033B 


BASPNT 


W21E 


DOl 


022D 


IF1 


02B7 


ENDOl 


0299 


ELS1 


0235 


THEN1 


023B 


THN1A 


0242 


D02 


0270 


EN DO 2 


0256 


EXP21 


0262 


EXP22 



02BA 


AINC 


02CE 


BINC 


0271 


IF2 


2 36 


ZLS2 


02BA 


AINC 


02CE 


BINC 


0271 


IF2 


0286 


ELS2 


027D 


THEN2 


02FE 


REPORT 


0345 


PNTBAS 


0296 


ENDIF2 


033D 


BASPT1 


029C 


ENDIF1 


029D 


IF3 


02B4 


ENDIF3 


2A9 


THEN 3 


0347 


PNTBS1 


02E2 


BXTCNT 


02F1 


HAFOP 


02FB 


THREE 


2FC 


TWO 


02FD 


ONE 


0300 


REPT1 


0331 


OUTSP 4 


030D 


REPT2 


0334 


OUTSP2 


035A 


HEADER 



saa@Q(s) 



7:23 



SIZE 


FROM 


TO 


FROM 


TO SIGN IF 


= 


0026 


2000 


2052 


4000 


4052 




x 0007 


2069 


207B 


4093 


40A5 




x 0006 


2099 


20A5 


42C2 


42CE 




x 0006 


2224 


2234 


437C 


438C 




X 000A 


2237 


224D 


4784 


479A 




x 000B 


274E 


2761 


479D 


47B0 




x 0008 


279D 


27AC 


47BB 


4 7CA 




007A 


28D1 


29BE 


47CF 


48BC 




0008 


29BF 


29D1 


4 8BC 


48CE 




0019 


29DB 


2A0D 


48CE 


4900 




004D 


2A17 


2AC6 


. 492D 


49DC 




002E 


2ACB 


2B33 


49E1 


4A49 




0035 


2B6E 


2BE5 


4A4 9 


4AC0 




000C 


2BF2 


2C04 


4ACD 


4ADF 




0106 


2CE2 


2F01 


4B27 


4D46 




SIZE 


FROM 


TO 


FROM 


TO SIGNIF 


= 


0026 


2000 


2052 


4000 


4052 




003D 


206C 


20F0 


4052 


40D6 




0020 


20F3 


213C 


40D6 


411F 




001F 


213C 


2180 


412 2 


4166 




000E 


2187 


21A7 


416D 


418D 




0046 


21AA 


224D 


4198 


423B 




0087 


2275 


2394 


4258 


4377 




0009 


23A8 


23BB 


4 38F 


43A2 




0126 


23C0 


25E6 


43A2 


45C8 




004C 


25F1 


269F 


45C8 


4676 




0087 


26C1 


27C1 


4692 


4792 




000E 


27C8 


27E2 


479D 


47B7 




000C 


27E5 


27F9 


47BB 


47CF 




007A 


28D1 


29BE 


4 7CF 


48BC 




0008 


29BF 


29D1 


48BC 


48CE 




0019 


2SDB 


2A0D 


48CE 


4900 




004D 


2A17 


2AC6 


492D 


49DC 




002E 


2ACB 


2B33 


49E1 


4A49 




0035 


2B6E 


2BE5 


4A49 


4AC0 




000C 


2BF2 


2C04 


4ACD 


4ADF 




0087 


2DE5 


2F01 


4C2A 


4D46 




SIZE 


FROM 


TO 


FROM 


TO SIGNIF 


= 


0026 


2000 


2052 


4000 


4052 




003D 


206C 


20F0 


4052 


40D6 




0020 


20F3 


213C 


40D6 


411F 




001F 


213C 


2180 


4122 


4166 




000E 


2187 


21A7 


41 6 D 


418D 




0046 


21AA 


224D 


4198 


423B 




0089 


2271 


2394 


4 254 


4377 




0126 


23C0 


25E6 


43A2 


45C8 




004C 


25F1 


2 69F 


4 5C8 


4676 




0089 


26BC 


27C1 


468D 


4792 




300E 


27C8 


27E2 


479D 


47B7 




000C 


27E5 


27F9 


4 7B3 


47CF 




7A 


28D1 


29BE 


4 7CF 


48BC 




001D 


29D1 


2A0D 


48C4 


4900 




004D 


2A17 


2AC6 


492D 


4 9DC 




002E 


2ACB 


2B33 


49E1 


4A49 




0035 


2B6E 


2BE5 


4A49 


4AC0 




ti00C 


2BF2 


2C04 


4ACD 


4ADF 




0089 


2DE1 


2F01 


4C2 6 


4D46 





Note: 
items tagged with 
an ' x ' represent 
false matches. 



0008 



000A 
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A MEMORY TEST PROGRAM FOR 

THE COMMODORE PET 



Michael 3. McCann 

28 Ravenswood Terrace 

Cheektowaga, NY 14225 



It would be useful and convenient to be able to 
test PET'S memory with a testing program rather 
than sending the machine back to Commodore for 
service. Towards this end I have written a 
memory test program in Commodore BASIC for the 
PET. The program is well commented, and should 
be self documenting, (see listing) 

Since the program occupies the lowest 4K of 
PET'S memory, use of the program will require 
that the lowest 4K of memory be operating norm- 
ally. The amount of time required to run this 
program rapidly increases as the number of bytes 
under test is increased (see Figure 1.) 

Testing large blocks of memory results in more 
rigorous testing at the expense of time. There- 
fore, when using this program the user will 
have to make a decision regarding rigor vs. 
time. As a bare minimum, I would suggest test- 
ing 100 bytes at a time. 

In closing I would suggest that you get this 
program up and running before you have a prob- 
lem. It may prove difficult to get a new pro- 
gram working when you have a major system prob- 
lem. 



10 REM MEMORY TEST PROGRAM FOR THE COMMODORE PET 

20 REM PROGRAM WILL RUN ON 8K PET 

30 REM BY MICHAEL J MCCANN 

HO PRINT CHR$(147) :EE=0:I=0 

50 INPUT "START ADDRESS"; SA 

60 IF SA<4097 OR SA>65535 GOTO 50 

70 INPUT "STOP ADDRESS"; SP 

80 IF ST>65535 OR SP<SA GOTO 70 

90 PRINT CHR$(147) :PRINT:PRINT 

100 PRINT TAB( 5) "WORKING" 

105 PRINT: PRINT"FAULT IN ADDRESS:"; 

110 REM MEMORY ACCESS AND LOGIC CIRCUITRY TEST 

120 REM WRITE ALL 

130 FOR A=SA TO SP 

140 POKE A,0 

150 NEXT 

160 REM CHECK FOR CORRECTNESS (=0) 

170 FOR A=SA TO SP 

180 IF PEEK(A)<>0 THEN EE=1:GOSUB 800 

190 NEXT 

200 REM WRITE ALL 255 

210 FOR A=SA TO SP 

220 POKE A, 255 

230 NEXT 

240 REM CHECK FOR CORRECTNESS(=255) 

250 FOR A=SA TO SP 

260 IF PEEK(A)<>255 THEN EE=1:GOSUB 800 

270 NEXT 

280 REM BEAT TESTS 

290 REM WRITE ALL 

300 FOR A=SA TO SP 

310 POKE A,0 

320 NEXT 

330 REM BEAT ONE ADDRESS WITH 255 

335 AD=SA+I 

340 POKE AD, 255 

350 POKE AD, 255 

360 POKE AD, 255 

370 POKE AD, 255 

380 POKE AD, 255 



390 REM CHECK ALL FOR EXCEPT THE ADDRESS 

BEAT WITH 255 
400 FOR A=SA TO SP 
410 IF A=AD GOTO 430 

420 IF PEEK(A)<>0 THEN EE=1:G0SUB 800 
430 NEXT 

440 IF AD=SP+1 THEN POKE AD,0: 1=1+1: GOTO 335 
450 1=0 

460 REM WRITE ALL 255 
470 FOR A=SA TO SP 
480 POKE A, 255 
490 NEXT 

500 REM BEAT ONE ADDRESS WITH 
505 AD=SA+I 
510 POKE AD,0 
520 POKE AD,0 
530 POKE AD,0 
540 POKE AD,0 
550 POKE AD,0 
560 REM CHECK ALL FOR 255 EXCEPT THE ADDRESS 

BEAT WITH 
570 FOR A=SA TO SP 
580 IF A=AD GOTO 600 

590 IF PEEK(A)<>255 THEN EE=1:G0SUB 800 
600 NEXT 

610 IF ADOSP+1 THEN 1=1+1 :P0KE AD,255:GOTO 505 
620 REM ADDRESSING TEST 

REM WRITE CONSECUTIVE INTEGERS (0-255) IN 

ALL LOCATIONS UNDER TEST 

1=0 

650 FOR A=SA TO SP 
660 IF 1=256 THEN 1=0 
670 POKE A, I 
680 1=1+1 

690 NEXT 

700 REM CHECK FOR CORRECTNESS 

705 1=0 

710 FOR A=SA TO SP 

720 IF 1=256 THEN 1=0 

730 IF PEEK(A)OI THEN EE=1:GOSUB 800 

740 1=1+1 

750 NEXT 

760 PRINT 

770 IF EE=0 THEN PRINT" NO MEMORY PROBLEMS DE- 
TECTED" 

780 END 

800 PRINT A; 

810 RETURN 



630 
640 




iflUOlj}® 



100 200 300 

BYTES TF-STEO 

Figure 1. Graph of Log(Time Required) vs. 
Number of Bytes Tested. (Time in Seconds) 
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SMITHWARE FOR YOUR PET . . . 

TESTED, RELIABLE SOFTWARE 

FROM S B S 

SB7--LIFE by Dr. Frank Covitz $10.00 

Fascinating simulation of cell colony growth. Kaleidoscopic 
patterns. Written in machine language with a Basic driver. 
1-2 generations per second! Two versions included: 
LIFE 40*25 and LIFE 64*64. Outstanding! 

SB5--BL0CKADE $ 8.00 

A real-time spacewar game. Defend the rebel stronghold 
against blockade by the evil empire. Your star cruiser is 
the rebels' last hope. See all the action on your screen— 
your keyboard is your control panel. A real challenger! 

SB4--UTILITY PACKAGE $ 8.00 

All the routines you need for reliable tape 1/0. Plus a 
tape dump, tape output demo, two memory dumps (Display 
memory on the screen in hex and ASCII or decimal and ASCII), 
a memory test, and two short demo programs. Worth its 
weight in gold! 

SB6--M0NIT0R $12.00 

3,800 bytes free for machine language programs. Save & load 
absolute files, move, verify, and display a block of memory, 
enter, jump to program, go-sub to subroutine. All in hex 
format, written in Basic. A must for any serious computer 
buff! 

SB2--STARTREK $ 8.00 

The classic computer game of strategy and tactics--very 
complete. Defend the Federation against the Klingon menace! 
You have warp engines, long and short range sensors, 
galactic records, phasers, and photon torpedoes. Battle 
rating controls game's difficulty. WARNING! This game may 
be addictive! 

SOME OR ALL OF THESE FINE CASSETTES ARE AVAILABLE AT: 
The Computer Store, Santa Monica, California 
Computer Components, Van Nuys, California 
Advanced Computer Products, Santa Ana, California 
Personal Computer Corporation, Frazier, Pennsylvania 

OR SEND CHECK OR MONEY ORDER TO: 

SMITH BUSINESS SERVICES 

P.O. Box 1125 

Reseda, CA 91335 

(California residents add 6% sales tax) 
Dealer Inquiries Invited 



MICROBES, A SUGGESTION, AMD AM .APOLOGY 



MICROBES 



Ah, how often it is the things in life which 
appear so simple that cause us great anguish and 
gnashing of teeth . We present here what we hope 
is the last microbe in '"A KIM Beeper" 4:43: 



3. When using the "BRK" command the system out- 
puts the error statement "ILLEGAL QUANTITY 
ERROR IN 10020", READY. 



the beeper CHlCfZo SIZ+) stlU 
doesn't beep - ct out*/ clicks \ 
This results from* -tfie £o£,of 
aJJress OtOV, operating on two 
identical operands ex.ee.p-t -Cor ike 
■first iteration i*t eacA "beep? 
This results iw a zen* be£*5 
<&>re* ifc P6V, L.C, no to^jUny- 

The t>-w-t>rJer bit oQ A sko-M 
be set be.^>re eacfc BoiZ. &«t, 

more si-iph '» eo(Z eeP > STA P6P 
may be replace* t>j Itic eBJ> 
C**J 3 VO?\ to preserve iMe brsmch) 

the Utter cWanye is testcA 
3n<L beep^S i* 4*-*- Packer**** ■ 

IZafxAi, Grrsves 

Even "Apple Pi" isn't simple any more! Neil D. 
Lipson of the Philadelphia Apple Users Group 
writes that "The Pi article by Bob Bishop (MICRO 
6:15) is missing one thing. Add HIMEM: 4096. " 
But, that's not all! Oohn Paladini writes that: 
"The value of Pi was not computed to 1000 deci- 
mal places, but rather 998. Such inaccuracies 
occur when computing a series where billions of 
calculations are required. My best guess is that 
in order to calculate Pi to 1,000 places using 
the given series one would have to compute to 
1,004 places. The last two digits should read 
89 not 96." 



A SUGGESTION 



We finally heard from an 0SI owner. John 
Sheffield writes that the BASIC Disassembler for 
Apple and PET by McCann (MICRO 5:25) can work on 
an 051 Challenger IIP with only a small change: 
"In each line where BY?» appears (lines 10, 30, 
3050) just change it to BY and everything works 
fine. Change to read like this: 

10 DIM MN$(256),BY(256),C0$(16) 

30 READ MN$(E),BY(E) 

delete line 100 

3050 ON BY(IB) GOTO 3060,3090,4050 
That's all that is needed. By the way that pro- 
gram works on HP's with 8K of RAM or more." 
I would be lead to believe that the BASIC Assem- 
bler would work with similar modifications. 

John Sheffield had a "p.s." on his letter which 
said "don't let the IIP be buried under all -he 
Apples and PETs". The staff of MICRO would love 
to publish material about the 0SI products, if 
only we had some to print! In our first year we 
received only two articles about 0SI. The first 
was one we "leaned on" a friend for when MICRO 
was just starting and needed material. The 
second was a scathing blast at 0SI from top to 
bottom by an obviously disgruntled customer! We 
do not publish strongly negative material on 
the basis of a single input, and therefore this 
article was not published. If there are OSI 
owners with something to share, MICRO will be 
most happy to hear from you and print your info. 



AN APOLOGY 



Although we made special efforts to make the 
McCann article "A Simple 6502 Assembler for the 
PET" error free, including careful proofing by 
us and the author, a couple of microbes slipped 
through. C. E. White and David Hustvedt wrote 
about the following problems: 

1. After entering the program from the keyboard 
your must save it on tape before going through 
"RUN" again. If you don't EN and ZZ are set to 
zero . 



2. 



Errors in the typed listing are: 



1040 HX$+SX$ ... S/B HX$=SX$ 

4030 ;MN$(1B);... S/B ;MN$(IB); 

5C20 ;TAB(27) OP S/B ;TAB(27);0P 

6060 ... NULL, 0, NULL, S/B three NULL,0' 

6100 DATA CLC,1,... S/B DATA CLI , 1 , 

6120 ..JMI,?,... S/B ...0MPI,3, 

6250 ...CPX,2,... S/B ...CPXZ,2, 

14350 GOTO 14380 S/B GOTO 14480 



One of the trade marks of MICRO has been qual- 
ity. We have made a great effort to obtain good 
articles and to present them in a high quality 
publication. We must therefore apoloqize for 
the printing quality of MICRO number 6. By 
the time we got the material back from the 
printer, who had done a reasonably good job on 
issues number 4 and 5, it was too late to do 
anything about the inferior quality of the prod- 
uct except to throw out obviously bad copies. 
We have gotten some letters and calls from 
readers who received incomplete or unreadable 
copies. If you have such a problem, please 
notify us by mail indicating which pages were 
defective, and we will promptly replace them. 



We apologize for the poor quality of issue 6. 
We have changed printers starting with this 
issue, and hope that the quality will be better. 
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COMPUTER 
SHOP 



288 NORFOLK ST. CAMBRIDGE, MASS. 02139 
corner of Hampshire & Norfolk St. 617-661-2670 



NO W W E HAVE S I 




C3-S1 Challenger I 
Dual Drive Floppy 
$3,590.00 



u 



=i 



dR 




u 



II System with 

Complete with 32K RAM Memory, Dual Drive 
Floppy, Serial Port, cabinets and power supplies. 
This Challenger III features an eight slot heavy- • 
duty main frame. You add only a serial 
ASCII Terminal. 

C2-S2S 32K RAM Serial Challenger II with 

Dual Drive Floppy Comes complete with 32K RAM Memory, Dual 
S3 090.00 Drive FI °PP V Disk (500,000 characters storage), 

' " 6502 processor and serial port. You add only a 

serial ASCII Terminal to be up and running. 

C2-S1S Serial Challenger II with 

Single Drive Floppy Comes complete with 16K RAM Memory, Single 

$1 990.00 Drive F,0 PPy Disk (250,000 characters storage), 

6502 processor and serial port. You need to add 
only Serial ASCII Terminal. 

C2-S1V Video Challenger II with 

Single Drive Floppy Comes complete with 16K RAM Memory, Single 

$2 490.00 Drive Floppy Disk, 6502 processor, Challenger 

' " MP type Video Interface and high quality key- 

board. You add only a Video Monitor (or RF 
generator and tv set). 

Offers all features of the Challenger IIP plus more 
room for expansion. The keyboard has a separate 
case with connector cable. The roomy cabinet 
and heavy duty power supply are designed to 
handle up to eight system boards (allowing for 6 
slots of expansion). 



C2-8P 

Challenger IIP 
with 8 Slot Cabinet 
$825.00 




C2-4P 

Challenger IIP 
$598.00 



v 



BAC,VISA,MC NO 
SIGNATURE 

NAME 

ADDRESS............ 

CITY 



STATE ....ZIP. 



KIMS AND UPGRADES 

VF8 4K Memory assembled & tested 129.00 

for low power RAM add 10.00 

same in kit form 74.50 

full set of sockets for Kit 10.00 

VF8 Motherboard buffered for 4 Boards 65.00 

Connector Assembly for KIM to VF8 20.00 

8K S100 Memory Board with instructions.K 165.00 

same but fully assembled and tested ... 199.00 

CS100 Cabinet cut out for KIM 129.00 

3 Connector S100 Motherboard Assembly 75.00 

CGRS S100 TIM Kit 129.00 

CGRS S100 6502 CPU Kit 179.00 

CGRS S100 Front Panel Kit .129.00 

XITEX Video Terminal Board 16X64K 155.00 

XITEX Video Terminal Board Assembled.. .185.00 

KIM-1 245.00 

CS100 with CGRS,Xitex,16KRAM,TV,KB 1529.00 

Same but Assembled 1989.00 

PS-5 Pwr Supp. 5V5A9VlA-12VlA6x6X2 75.00 

PS-5 Assembled 90.00 

Total of Order. .Circle Items wanted. $. 

Mass. Residents Sales Tax 5% $ 

Shipping, 1%($2.00 min.) $ 

Total Remittance or Charge $ 



THE MICRO SOFTMARIE CATALOG: IV 

Mike Rbwe 

P.O. Box 3 

So. Chelmsford, MA 01824 







Name: Bridge Challenger 

System: PET or Apple II 

Memory: 8K PET or 16K Apple II 

Language: Not specified 

Hardware: Not specified 

Description: Bridge Challenger lets you and the 

dummy play four person Contract Bridge against 

the computer. The program will deal hands at 

random or according to your criterion for high 

card points, and you can save hands on cassette 

and reload them for later play. You can review 

tricks, rotate hands East-West, shuffle only the 

defense hands, or replay hands when the cards 

are known. 

Copies: Not specified 

Price: $14.95 

Includes: Not specified 

Author: Not specified 

Available from: 

Personal Software 

P.O. Box 136 

Cambridge, HA 02138 

617/783-0694 



Name: CURSOR - Programs for PET Computers 
System : PET 
Memory : 8K 

Language: BASIC and Assembly Language 
Hardware : Standard PET 

Description: CURSOR is a cassette magazine with 
proven programs written just for the 8K PET. 
Each month the subscriber receives a C-30 cas- 
sette with five or more high quality programs 
for the PET. People can't read this "magnetic 
magazine", but the PET can! The CURSOR staff 
includes professional programmers who design and 
write many of the programs. They also carefully 
edit programs which are purchased from individ- 
ual authors. 
Copies : Not specified 
Price: $24 for 12 monthly issues 
Includes: Cassette 
Authors: Many and varied 
Available from : 

Ron Jeffries, Publisher 

CURSOR 

P.O. Box 550 

Goleta, CA 93017 

805/967-0905 



Name: PET Schematics and PET ROM Routines 
System: PET 
Memory : None 
Language : None 
Hardware: None 

Description: PET Schmatics is a very complete 
set of accurately and painstakingly drawn schem- 
atics about your PET. It includes a 24" x 30" 
CPU board, plus oversized drawings of the Video 
Monitor and Tape Recorder, plus complete Parts 
layout - all the things you hoped to get from 
Commodore, but didn't! 

PET ROM Routines are complete as- 
sembly listings of all 7 ROMs, plus identified 
subroutine entry points. 
Copies: Not specified. 
Price: PET Schematics - $34.95 

PET ROM Routines - $19-95 
Available from: 

PET-SHACK Software House 

Marketing and Research Co. 

P.O. Box 966 

Mishawaka, IN 46544 



Name: S-C Assembler II 
System: Apple II 
Memory: 8K 

Language: Assembly language 
Hardware: Apple II, optional printer 
Description: Combined text editor and assembler 
carefully integrated with the Apple II ROM-based 
routines. Editor indues full Apple II screen 
editing, BASIC-like line-number editing, tab 
stops, and renumbering. LOAD, SAVE, and APPEND 
commands for cassette storage. Standard Apple 
II syntax for opcodes and address modes. Labels 
(1 to 4 characters), arithmetic expressions, and 
comments. English language error messages. 
Monitor commands directly available within as- 
sembler. Speed and suspension control over 
listing and assembly. 
Copies: Just released, over 100 sold. 
Price: $20.00 (Texas residents add 5? tax) 
Includes: Cassette in Apple II format and 

a 28 page reference manual . 
Author: Bob Sander-Cederlof 
Available from: 

S-C Software 

P.O. Box 5537 

Richardson, TX 75080 



Name: PL/65 or CSL/65 
System: SYSTEM 65 or PDP 11 
Memory: 16K bytes RAM 
Language: Machine language. 
Hardware: Rockwell SYSTEM 65 

Description: A high-level language resembling 
PL/1 and ALGOL is now available to designers de- 
veloping programs for the 6500 microprocessor 
family using either the SYSTEM 65 development 
system of the PDP 11 computer. PL/65 is consid- 
erably easier to use than assembly language or 
object code. The PL/65 compiler outputs source 
code to the SYSTEM 65's resident assembler. 
This permits enhancing or debugging at the as- 
sembler level before object code is generated. 
In addition, PL/65 statements may be mixed with 
assembly language instructions for timing or 
code optimization. 
Copies: Not specified. 
Price: Not specified from Rockwell. 

$500 from C0MPAS. 
Includes: Minifloppy diskette. 
Authors: Not specified. 
Available from: 

Electronic Devices Division 

Rockwell Internationsal 

P.O. Box 3669 

Anaheim, CA 92803 

714/632-2321 (Leo Scanlon) 

213/386-8776 (Dan Scnlosky) 

COMPAS - Computer Applications Corp. 

413 Kellogg 

P.O. Box 687 

Ames, IA 50010 

515/232-8181 (Michael R. Corder) 
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Mane : PRO-CAL I 
System: PET 
Memory: Not specified. 
Language: BASIC and machine language. 
Hardware: Not specified. 

Description: A reverse polish scientific 
calculator program, ideally suited for scientif- 
ic and educational applications. Supports sing- 
le key execution of more than 50 forward and in- 
verse arithmetic , algebraic , trigonometric and 
exponential functions. It implements calcula- 
tions in binary, octal, decimal, and hexidecimal 
modes with single keystroke conversion between 
modes and simultaneous decimal equivalen dis- 
play. It also allows the recording and playback 
of calculator programs on cassette tape permit- 
ting the use of most calculator software already 
in existance up to a limit of 255 steps. 
Copies: Not specified. 
Price; $26.00 domestic, $28.00 foreign. 
Includes: Software on cassette and an operating 

manual . 
Authors: Not specified. 
Available from : 

Applications Research Co. 

13460 Robleda Road 

Los Altos Hills, CA Q4022 



Name: MICR0CHESS 
Systems: PET and Apple II 
Memory: PET - 8K/ Apple II 16K 
Language: 6502 Machine Language 
Hardware: Standard PET or Apple II 
Description: MICR0CHESS is the culmination of 
two years of chessplaying program development by 
Peter Jennings, author of the famous IK byte 
chess program for the KTM-1 . MICROCHESS offers 
eight levels of play to suit everyone from the 
beginner learning chess to the serious player. 
It examines positions as many as 6 moves ahead, 
and includes a chess clock for tournament play. 
Every move is checked for legality and the 
current position is display on a graphic chess- 
board. You can play White or Black, set up and 
play from special board positions, or even watch 
the computer play against itself. 
Copies: Not specified. 
Price: $19-95 
Includes: Not specified. 
Author: Peter Jennings 
Available from: 

Personal Software 

P.O. Box 136 

Cambridge, MA 02138 

617/783-069^ 



Name: Financial Software 

System: Apple II (easily modified for PET) 
Language: Applesoft II 
Hardware: Apple II 

Description: Sophisticated financial programs 
used to aid in investment analysis. The follow- 
ing programs are currently available: Black- 
Scholes Option Analysis, Security Analysis using 
the Capital Asset Pricing Model , Bond Pricing I 
and II, Cash Flow and Present Value Analysis I 
and II, Stock Valuation, Rates of Return, Calcu- 
lations and Mortgage Analysis. 
Copies: Just released. 

Price: $15-00 each or $50.00 for all 9 programs 
Includes: Cassette, annotated source listings, 

operating and modifying instructions, 

sample runs and backgroud information. 
Author: Eric Rosenfeld 
Available from: 

Eric Rosenfeld 

70 Lancaster Road 

Arlington, MA 02 17U 



Name: Apple II BASEBALL 
System: Apple II 
Memory: 16K or more 
Language : Integer BASIC 
Hardware : Standard Apple II 

Description: An interactive baseball game that 
uses color graphics extensively. You can play a 
7 or 9 inning game with a friend, (it will han- 
dle extra innings) , or play alone against the 
computer. Has sound effects with men running 
bases. Keeps track of team runs, hits, innings, 
balls and strikes, outs, batter-up and uses pad- 
dle input to interact with the game. Uses every 
available byte of memory. 
Copies: Just released. 

(Dealers inquiries invited) 
Price: $12.50 

Includes; Game Cassette, User Bookelt with cora- 
plete BASIC listing. 

Authors: Pat Chirichella and Annette Nappi 
Available from: 

Pat Chirichella 

506 Fairview Avenue 

Ridgewood, NY 11237 



Name: DDT-65 Dynamic Debugging Tool 

System: Any 6502 based system 

Memory: 3K RAM/1K RAM for loader 

Language: Machine Language 

Hardware: 32 char/line terminal 

Description: DDT-65 is an advanced debugger 

that allows easy assembly and disassembly in 

650X mnemonics. Software single-stepping and 

automatic breakpoint insertion/deletion allow 

debuffing of code even in PROM. DDT-65 comes in 

a relocatable form on tape for loading into any 

memory or for PROM programming. 

Copies: 11+ 

Price: $25-00 

Include: 10 page manual, relocating tape 

cassette . 
Ordering Info: KIM format cassette - K 
Kansas City at 300 baud for OSI - 
Kansas City at 300 baud for TIM/ JOLT - T 
Author: Rich Challen 
Available from: 

Rich Challen 

939 Indian Ridge Drive 

Lynchburg, VA 24502 
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APPLE CALLS AND HEX-DECIMAL CONVERSION 



Marc Schwartz 

220 Everit Street 

New Haven, CT 06511 







Rich Auricchio's "Programmer's Guide to the 
Apple II" (MICRO #4, April/May 1978) is a very 
useful step in getting out printed materials to 
help users fully exploit the Apple's potential. 
That his table of monitor routines can be used 
in BASIC programming is worth noting . 

Many monitor routines can be accessed in BASIC 
by CALL commands addressed to the location of 
the first step of the routine. If the routine 
is located in hex locations 0000 to 4000, it is 
necessary only to convert the hex location to 
decimal and write CALL before the decimal num- 
ber. Thus a routine located at hex 1E would be 
accessed by the command: CALL 30, since hex 00 1E 
= decimal 30. 

If you do not have a hex-decimal conversion 
table handy, you can convert larger numbers to 
decimal with the help of the Apple by the fol- 
lowing steps : 

1. Start in BASIC (necessary for step 2) 

2. Multiply the first (of four) hex digits 
by 4096, the second by 256, the third by 16 and 
the fourth by one. Add the four numbers to get 
the decimal equivalent. For example, to get the 
decimal conversion of 03E7, with the Apple in 
BASIC, press Control/ C and type 

>PRINT 0*4096 + 3*256 + 14*16 + 7 
then press RETURN. You'll get your decimal 
answer : 839 • To begin a monitor routine you 
wrote starting at 03E7, merely put CALL 839 in 
.your program. 

If the hex location of the routine is between 
C000 and FFFF, then another method of figuring 
out the corresponding decimal location must be 
used . 

1. Start in BASIC 

2. Press the RESET button. 

3. Take the hex location of the routine and 
subtract if from FFFF. The Apple will help you 
do this; subtract each pair of hex digits from 
FF and press RETURN. The Apple will print the 
answer to each subtraction for you. For example 
the hex location of the routine to home cursor 
and clear screen is $FC58. 



* FF - FC RETURN 

= 03 
« FF - 58 RETURN 

= A7 

So, $FFFF - $FC58 = $03A7. 

Now convert to decimal as above , using BASIC 
( control/ C) to assist you. 

>PRINT 0*4096 + 3*256 + 10*16 + 7 

and after pressing RETURN you will have your 
answer, 935. 

4. Add one to the total, here giving 936. 

5. Make the new total negative, or -936. 

6. That's it. Now just put a CALL in front 
of the number: CALL -936. 

Of course , these steps of converting hex loca- 
tions to decimal are the same ones to take if 
you want to access the PEEK or POKE functions of 
the Apple . In all , they allow the BASIC pro- 
grammer to take much fuller advantage of the 
capabilities of the computer. 

And while on the subject of hex-decimal conver- 
sion, the Apple can help in decimal to hex con- 
version as well . For example to find the hex of 
a number , say 8765 : 

1. Start in BASIC 

2. Divide the number by 4096, then find the 
remainder : 

>PRINT 8765/4096, 8765MOD4096 (return) 
2 573 

3. Repeat the process with 256 and 16: 

>PRINT 573/256, 573MOD256 (return) 

2 61 

>PRINT 61/16, 61 MOD 16 (return) 

3 13 

...giving 2 2 3 13 or 223C. 
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WRITING FOR MICRO 
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One of the reasons we like the 6502 is that it 
seems to attract a lot of very interesting, act- 
ive, enthusiastic users. We spend several hours 
each week talking to people who are so excited 
about what they are doing with their system that 
they just have to talk to someone. Oh, some- 
times they pretend they have some "burning" 
question or whant to order some small item, but 
really they mostly want to tell someone about 
all of the fun they are having or the discover- 
ies they are making. 

While we enjoy these conversations, and consider 
them one of the "fringe benefits" of editing 
MICRO, it disturbs us that many of these enthus- 
iasts who are willing to spend five to ten dol- 
lars on a phone call to us, are not willing to 
spend a little time writing down their informa- 



tion for publication in MICRO where thousands 
can share it (and they can earn a few dollars). 

MICRO, in order to serve its main purpose of 
presenting information about all aspects of the 
6502 world, needs to receive information from a 
wide variety of sources. To achieve a more bal- 
anced content, we desparately need articles on: 
industrial, educational, business, home, and 
other real applications of systems; non-KIM, 
-APPLE, -PET systems, homebrew and commercial; 
techniques for programming, interfacing, and ex- 
panding systems; and many other topics. Look to 
your own experience. If you have anything to 
share, then take the time to write it down. The 
"Manuscript Cover Sheet" on the next page should 
serve as a guide and make it a little easier tc 
submit your article. 
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MANUSCRIPT COVER SHEET 
Please complete all information requested on this cover sheet, 
Date Submitted: 

#■ — — — -■■■ ■ - ■ — — ■ M " " — ~ 

Proposed Title: „ 



Author( s) Narae(s) : 



Mailing Address: , .. 

(This will be published.) 

Area Code: , . Phone: , , 

(This will NOT be published.) 

AUTHOR'S DECLARATION OF OWNERSHIP OF MANUSCRIPT RIGHTS: This manuscript is ray/our 
original work and is not currently owned or being considered for publication by 
another publisher and has not been previously published in whole or in part in 
any other publication. I/we have written permission from the legal owner(s) to 
use any illustrations, photographs, or other source material appearing in this 
manuscript which is not my/our property. If required, the manuscript has been 
cleared for publication by my/our employer (s). Note any exceptions to the above 
(such as material has been published in a club newsletter but you still retain 
ownership) here: 



Signature(s) 



Date : 



^ 



Any material which you are paid for by The COMPUTERIST, whether or not it is 
published in MICRO, becomes the exclusive property of The COMPUTERIST, with all 
rights reserved. 

A Few Suggestions 

All text material will be retyped. Therefore your format does not matter as long 
as it is readable. Double spaced, typed, is preferable, but not required. Any 
figures should be neatly drawn to scale as they will appear in MICRO. If we have 
to redraw the figures and diagrams, then we normally will pay less for that page. 
Photographs should be glossy prints either the same size as the final will be or 
twice the final size. We will re-assemble all programs to obtain clean listings 
using the syntax we have adopted (see inside back cover - MICRO #1). Since others 
will be copying your code, please try to thoroughly test it and make sure it 
is as error free as possible. Submit your articles early. We will try to get a 
proof back to you for final correction, but with our tight schedule this may not 
always be possible. Send your manuscripts to: 

Robert M. Tripp, Editor, MICRO, P.O. Box 3, So. Chelmsford, MA 01824, U.S.A. 

I__ll(i_r:!fi_ 7:32 
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6502 BIBLIOGRAPHY 
PART VI 

William R. Dial 
438 Roslyn Ave. 
Akron, OH 44320 

361. Bridge, Theodore E. "High Speed Cassette I/O for the KIM-1", DDJ 3. Issue 6 No 26, Pg 24-25, 

(June/July, 1978). Will load or dump at 12 times the speed of KIM-1. Supplements the 
MICRO-ADE Editor-Assembler. 

362. Baker, Robert "KIMER: A KIM-1 Timer", Byte 3 No 7 Pg 12, (July, 1978). The program converts 

the KIM-1 into a 24-hr digital clock. 

363- Conley, David M. "Roulette on Your PET with Bells and Whistles", Personal Computing £ No 7 Pg 22- 

24 (July, 1978). How to add extras in a program for added interest. 

3 64 - KIM-1/6502 User Notes, Issue 11, (May, 1978) 

Lewart , Cass R. "An LED Provides Visual Indication of Tape Input". An LED allows you to see 

that the tape recorder is feeding proper signals to KIM. 
Rehnke, E. "Hardware Comparison". The editor compares KIMSI vs. KIM-4 as expansion for KIM . 
Rehnke, E. "Software Comparison". The editor compares the MOS Technology Assembler/Editor 

from ARESCO versus the MICRO-ADE Assembler/Disassembler/Editor from Peter Jennings, 

Toronto. 
Edwards, Lew "Skeet Shoot, with Sound". Butterf ield 's "Skeet Shoot" modified with the Kush- 

nier's phaser sound routine, for KIM. 
DeJong, Marvin "Digital Cardiotachtometer" . KIM counts heartbeats per minute and displays 

count while measuring next pulse period. 
Rehnke, E. "Book review: 'Programming a Microcomputer: 6502'". Foster Caxton's recent book 

is highly recommended . 
Coppola, Vince "Loan Program in FOCAL". FOCAL-65 is used to figure interest on a loan. 
Flacco, Roy "Joystick Interface". A joystick, some hardware, are used to put the Lunar 

Lander (First Book of KIM) on the face of a Scope. 
Kurtz, Bob "Morse Code Reader Program". Use KIM in the hamshack. 
Zuber, Jim "Interfacing the SWTPC PR-40 Printer to KIM-1". An easy way to use this low cost 

printer. 
Nelis, Jody "Revision to Battleship Game". Modification to correct a small defect in the 

original program. 

365. people's Computers I No 1 (July/Aug, 1978). 

Cole, Phyllis "SPOT". Several notes and tips of interest to PET owners. 

Cole, Phyllis "Tape Talk". Notes on problems associated with tape I/O on the PET. 

Gash, Philip "PLOT". Program plots any single-valued function y(x) on a grid. 

Julin, Randall "Video Mixer". A circuit to mix the three video signals put out by the 

PET's IEEE 488-bus. 
Bueck/ Jenkins "PETting a DIABLO". How to make PET write using a Diablo daisy wheel printer. 

366. Harr, Robt. Jr. and Poss, Gary F. "TV Pattern Generator", Interface Age 3. Issue 8 Pg 80-82; 160, 

(Aug, 1978). Pattern generator in graphics for the Apple II monitor. 

367. Personal Computing £ No 8 (Aug, 1978). 

Maloof, Darryl M. "PET Strings" (letter to Editor). Note on changing a character string 

to numeric values and vice-versa. 
Connors, Bob "PET Strings" (letter to Editor). More on changing character strings to 

numeric values. 
Bueck/ Jenkins "Talking PET" (letter to the Editor). Notes on the interfacing of a Diablo 

daisy wheel printer with PET through the PET ADA device. 

368. Lasher, Dana "The Kalculating KIM-1", 73 Magazine, No 215 Pg 100-104 (Aug, 1978). Calculator 

versatility for any KIM is provided by interfacing a calculator chip and a scanning routine 
with KIM. 

369. OSI-Small Systems Journal £ No 2 (Mar/Apr, 1978). 

Anon. "The 542 Polled Keyboard Interface". Polled keyboards have many advantages over 

standard ASCII keyboards. 
Anon. "Basic and Machine Code Interfaces". This is the first in a series of articles on 

BASIC and machine code. 
Anon. "Using the Model 22 0KIDATA Printer". A quick and dirty way to use those special 

font and scroll commands of the Model 22 0KIDATA Printer. 
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370. Dr. Dobbs Journal 3. Issue 7 No 27 (Aug, 1978). 

Moser, Carl "Fast Cassette Interface for the 6502". Record and load at 1600 baud. 

Meyer, Bennett "Yet Another 6502 Disassembler Fix". Changes to correct a number of errors 

in the five digit codes used for deciphering the instructions in the BASIC language 

disassembler published earlier in DDJ 3. No 1 . 
Anon. "Apple Users Can Access Dow Jones Information Service". With a telephone link-up, 

Apple II users can dial Dow Jones Information Service. 

371. Kilobaud Issue 21 (Sept, 1978). 

Wells, Ralph "Trouble Shooters' Corner". Another chapter in the saga of the compatibility 
of the Apple II with a VIA/PIA. See EDN May 20,1978; MICRO Issue 5, Pg 18, June/ July, 
1978. 

Tenny, Ralph "Troubleshooters* Guide". Useful suggestions for those tackling repair and 
interfacing problems. 

Young, George "Do-It-All Expansion Board for KIM". How to make an expansion board, expan- 
sion power supply, new enclosure, etc., for your FCIM-1. 

Ketchum, Don "KIM Organ". Play tunes directly from the KIM keyboard. 

Grina, James "Super Cheap 2708 Programmer". An easy-to-build PROM programmer driven by 
the KIM-1. 

372. Conway, John "Glitches Can Turn Your Simple Interface Task into a Nightmare". Difficulties 

in using an Apple II with a PIA in an I/O interface, apparently caused by a clock signal 
arriving a little early. 

373- Notley, M. Garth "Plugging the KIM-2 Gap". Byte 1 No 9 Pg 123 (Sept, 1978). How to map the 
KIM-1 address range of 0400 to 13FF into a KIM-2 address range of 1000 to 1FFF. 

374. Turner, Bill and Warren, Carl "How to Load Floppy ROM No 5", Interface Age 3. No 9 Pg 60-61 

(Sept, 1978). Side No 1 is in Apple II format at 1200 baud, "The Automated Dress Pattern". 

375. Smith, Wm. V.R. Ill "The Automated Dress Pattern for the Apple II". Interface Age 3. No 9 

Pg 76-81 (Sept, 1978). A McCalls pattern is the basis for the program and accompanying 
Floppy ROM. 

376. MICRO Issue 6 (Aug/Sept, 1978). 

Husbands, Charles R. "Design of a PET/TTY Interface". Describes the hardware interface and 

software to use the ASR 33 Teletype as a printing facility for the PET. 
Faraday, Michael "Shaping Up Your Apple". Information on using Apple II's High Resolution 

Graphics. 
Eliason, Andrew H. "Apple II Starwars Theme". Disassembler listing of theme from Star Wars. 
Bishop, Robert J. "Apple PI". How to calculate PI to 1000 places on your Apple II. 
McCann, Michael J. "A Simple 6502 Assembler for the PET". Learn to use Machine language 

with this assembler. 
Rowe, Mike "The Micro Software Catalog: III". Software listing for 6502 systems. 
Gaspar, Albert "A Debugging Aid for the KIM-1". A program designed to assist the user in 

debugging and manipulating programs. 
DeJong, Marvin L. "6502 Interfacing for Beginners: Address Decoding II". Good tutorial 

article. 
Suitor, Richard F. "Brown and White and Colored All Over". Discussion of the colors in the 

Apple and their relation to each other and the color numbers. 
Witt, James R. "Programming a Micro-Computer: 6502 by Caxton Foster". More accolades for 

this fine book. 
Merritt, Cal E. "PET Composite Video Output". How to get video output for additional 

monitors. 
Quosig, Karl E. "Power from the PET". How to tap the unregulated 8v and regulate to 5v. 
Suitor, Richard F. "Apple Integer BASIC Subroutine Pack and Load". Loading assembly 

language programs with a BASIC program. 
Creighton, Gary A. "A Partial List of PET Scratch Pad Memory". Tabulation of a number of 

important addresses. 

377. Corbett, C. "A Mighty MICROMITE" . Personal Computer World 1 No 4 Pg 12 (Aug, 1978). Descriptive 

article on the KIM-1 for the European and British readers. 

378. Coll, John and Sweeten, Charles "Colour is an Apple II". Personal Computing World 1 No 1 Pg 

50-55 (Aug, 1978). Description of the Apple II. 

379- North, Steve "PET Cassettes from Peninsula School". Creative Computing 4. No 5 Pg 68 (Sept/Oct, 
1978). A number of programs written in PILOT, a language designed for CAI dialog applica- 
tions. This requires a program to interpret PILOT in Basic. 
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Did you ever wonder just what magazines were the 
richest sources of information on the 6502 
microprocessor, 6502-based microcomputers, acc- 
essory hardware and software? For several years 
this writer has been assembling a bibliography 
6502 references related to hobbv computers and 
small business systems (see MICRO No's i, 3, 
4, 5, and 6). A review of the number of times 
various magazines are cited in the bibliography 
gives a rough measure of the coverage of these 
magazines of 6502 related subjects. Even after 
such a fequency chart is compiled , an accurate 
comparison is difficult. Some of the magazines 
have been published longer than others. Some 
periodicals have been discontinued, others have 
been merged with continuing publications. Some 
give a lot of information in the form of ads, 
others are devoted mostly to authored articles. 
Regardless of the basis of the tabulation of 
references, however, some publications are 
clearly more useful sources of information on 
the 6502 than others. 

The accompanying list of magazines has been 
compiled from the bibliography. At the top of 
the list are several publications which special- 
ize in 6502-related subjects. These include 
this publication, MICRO, as well as the KIM-1 
/6502 USER NOTES. Also in this category is 
OHIO SCIENTIFIC'S SMALL SYSTEMS JOURNAL, a 
publication which covers hardware and software 
for the Ohio Scientific 6502-based computers. 
KILOBAUD, BYTE and DR. DOBB'S JOURNAL all give 
good coverage on the 6502 as well as other 
microprocessors. KILOBAUD has more hardware and 
constructional articles than most computer mag- 
azines. ON-LINE is devoted mainly to new pro- 
duct announcements and has very frequent refer- 
ences to 6502 related items. Following these 
come a group of magazines with somewhat less 
frequent references to the 6502. Finally toward 
the end of the list are those magazines with 
only occasional or trivial references to the 
6502. An attempt has been made to give up-to- 
date addresses and subscription rates for the 
magazines cited . 



MICRO 

$6.00 per 6 issues 

MICRO 

P.O. Box 3 

S. Chelmsford, MA 01824 

KIM- 1/6502 USER NOTES 
$5.00 per 6 issues 

Eric Rehnke 

P.O. Box 33077 

Royalton, OH 44133 

OHIO SCIENTIFIC— SMALL SYSTEMS JOURNAL 
$6.00 per year (6 issues) 

Ohio Scientific 

1333 S. Chillicothe Rd . 

Aurora, OH 44202 

KILOBAUD 
$15-00 per year 

Kilobaud Magazine 

Peterborough, NH 03458 



BYTE 

$12.00 per year 

Byte Publications, Inc. 

70 Main St. 

Peterborough, NH 03458 

DR. DOBB'S JOURNAL 

$12.00 per year (10 issues) 

People's Computer Co. 

Box E 

1263 El Camino Real 

Menlo Park, CA 94025 

ON-LINE 

$3.75 per year (18 issues) 

D. H. Beetle 

24695 Santa Cruz Hwy 

Los Gatos, CA 95030 

PEOPLE'S COMPUTERS (Formerly PCC) 
$8.00 per year (6 issues) 
People's Computer Co. 

1263 El Camino Real 

Box E 

Menlo Park, CA 94025 

INTERFACE AGE 
$14.00 per year 

McPheters, Wolfe & Jones 

16704 Marquardt Ave. 

Cerritos, CA 90701 

POPULAR ELECTRONICS 
$12.00 per year 

Popular Electronics 

One Park Ave. 

New York, NY 10016 

PERSONAL COMPUTING (Formerly MICR0TREK) 
$14.00 per year 

Benwill Publishing Corp. 

1050 Commonwealth Ave. 

Boston, MA 02215 

73 MAGAZINE 
$15.00 per year 

73, Inc. 

Peterborough, NH 

CREATIVE COMPUTING 
$15.00 per year 

Creative Computing 

P.O. Box 789-M 

Morristown, NJ 07960 

SSSC INTERFACE 

(Write for information) 

Southern California Computer Soc . 

1702 Ashland 

Santa Monica, CA 90405 

EDN (Electronic Design News) 

$25-00 per year 

(Write for subscription info) 

Cahners Publishing Co. 

270 St Paul St. 

Denver, CO 80206 
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RADIO ELECTRONICS 

$8.75 per year 

Gernsback Publications, Inc. 
200 Park Ave. , South 
New York, NY 10003 

QST 

$12.00 per year 

American Radio Relay League 

225 Main St. 

Newington, CT 06111 

IEEE Computer 

(Write for subscription info) 

IEEE 

345 E. 47th St. 

New York, NY 10017 

ELECTRONICS 
$14.00 per year 

Electronics 

McGraw Hill Bldg. 

1221 Ave. of Americas 

New York, NY 10020 

POLYPHONY 
$4.00 per year 

PAIA Electronics, Inc. 

1020 W. Wilshire Blvd. 

Oklahoma City, OK 73116 

CALCULATORS, COMPUTERS 
$12.00 per year (7 issues) 

Dynax 

P.O. Box 310 

Menlo Park, CA 94025 



COMPUTER MUSIC JOURNAL 
$14.00 per year (6 issues) 

People's Computer Co. 

Box E 

1010 Doyle St. 

Menlo Park, CA 94025 

POPULAR COMPUTING 
$18.00 per year 

Popular Computing 

Box 272 

Calabasas, CA 91302 

MINI-MICRO SYSTEMS 

$18.00 per year 

Modern Data Service 

5 Kane Industrial Drive 

Hudson, MA 01749 

DIGITAL DESIGN 

$20.00 per year 

(Write for subscription info) 

Benwill Publishing Corp. 

1050 Commonwealth Ave. 

Boston, MA 02215 

ELECTRONIC DESIGN 

(26 issues per year) 

(Write for subscription info) 

Hayden Publishing Co., Inc 

50 Essex St. 

Rochelle Park, NJ 07662 

HAM RADIO 

$12.00 per year 

Communications Technology 
Greenville, NH 03048 



COMPUTER WORLD 

$12.00 per year (trade weekly) 

(Write for subscription info) 

Computer World 

797 Washington St. 

Newton, MA 02160 



Editor's Note: In addition to the magazines 
regularly covered by the 6502 Bibliography, the 
following magazines may also be of interest to 
various 6502 readers : 



PET GAZETTE 

Free bi-monthly (Contributions Accepted) 
Microcomputer Resource Center 
1929 Northport Drive, Room 6 
Madison, WI 53704 



THE PAPER 

$15.00 per year (10 issues) 

The PAPER 

P.O. Box 43 

Audubon, PA 19407 



Robert Purser's REFERENCE LIST 

OF COMPUTER CASSETTES 
Nov 1978 $2.00/Feb 1979 $4.00 

Robert Purser 

P.O. Box 466 

El Dorado, CA 95623 

THE SOFTWARE EXCHANGE 
$5.00 per year (6 issues) 

The Software Exchange 

P.O. Box 55056 

Valencia, CA 91355 



PET USER NOTES 

$5-00 per year (6 or more issues) 

PET User Group 

P.O. Box 371 

Montgomeryville, PA 18936 

CALL A.P.P.L.E 

$10.00 per year (includes dues) 

Apple Puget Sound Program Library Exchar 

6708 39th Ave. SW 

Seattle, WA 98136 



r>n r» r^ rr\ rzrs 



KIH-1 AS A DIGITAL VOLTMETER 

Joseph L. Powlette and Charles T. Wright 

Hall of Science, Moravian College 

Bethlehem, PA 18018 
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Several programs have been described in the lit- 
erature which turn a KIM-1 microcomputer into a 
direct reading frequency counter. In "A Simple 
Frequency Counter Using the KIM-1" by Charles 
Husbands (MICRO, No. 3, Pp. 29-32, Feb/Mar , 1978) 
and in "Here's a Way to Turn KIM Into a Freq- 
uency Counter" by Joe Laughter (KIM User's Note 
Issue 3, Jan, 1977), good use is made of KIM-1 's 
interval timers and decimal mode to produce a 
useful laboratory instrument. A simple change 
in hardware will allow these same programs to 
serve as the basis of a direct reading digital 
voltmeter. This article describes an inexpen- 
sive voltage-to- frequency converter (VFC) cir- 
cuit which is compatible with these programs and 
also describes some software modifications which 
will allow Husbands' program to operate down to 
low frequency (10 HZ) values. 

Hardware Configuration 

The VFC circuit is shown in Figure 1. The 4151 
chip is manufactured by Raytheon and is avail- 
able from Active Electronic Sales Corp., P.O. 
Box 1035, Framingham, MA 01701 for $5.00 or from 
Jameco Electronics, 1021 Howard Street, San 
Carlos, CA 94070 for $5-95. The circuit param- 
eters given in Figure 1 have been modified from 
the values suggested by the manufacturer in 
ord er to match the pulse requirement for the KIM 
IR Q signal . The frequency of the output pulse 
is proportional to the input voltage and the 1K*. 
(multiturn) trimpot is used to adjust the full- 
scale conversion so that 10 v olt s corresponds to 
a frequency of 10 KHz. It is not necessary to 
calibrate the KIM-1 as a frequency meter since 
any variation in its timing can be compensated 
for by the trimpot . A known potential is con- 
nected to the VFC input and the trimpot adjust- 
ed until the KIM readout agrees with the known 
voltage value. The linearity of the VFC is 
better than 1$ down to 10 mv (linearity of 0.05$ 
can be achieved in a "precision mode" which is 
described in the Raytheon literature). The 
circuit will not respond to negative voltages 
and protection of the chip is provided by the 
1N914 diode. If negative voltage readings are 
also required, the input to the VFC can be pre- 



ceded by an absolute value circuit (see IC OP- 
AMP cookbook by Jung, p. 193, Sams Pub.). 

To operate the system using Laughter's software 
the following connections should be made: 1) 

the output (pin 3) of the VFC to the PB0 input 
of KIM (pin 9 on the app lication connector) and 
2) PB7 on the KIM to IRQ on the KIM (A-15 to E- 
4). Execution of the program should cause the 
voltage to flash on the KIM display in one sec- 
ond intervals. 

The software described in Husbands' article will 
not operate below 500 Hz. This limit is caused 
by the fact that the contents of the interval 
timer are read to determine if the 100 millisec- 
ond interval has elapsed and since the interval 
counter continues to count (at a 1T rate) after 
the interval has timed out , there are times when 
the contents of the interval timer are again 
positive. If the interrupt should sample during 
this time, the branch on minus instruction will 
not recognize that the interval has elapsed . 
This problem will manifest itself as a fluctuat- 
ing value in the display and is most likely to 
occur at low frequencies. One solution is to 
establish the interval timer in the interrupt 
mode and then allow the program to arbitrate the 
interrupt, i.e., to determine whether the inter- 
rupt was due to the input pulse or the expira- 
tion of the 100 millisecond interval timer. The 
necessary changes to Husbands' program are given 
in Figure 2. The hardware connectio ns are: 1) 
output of the VFC (pin 3) to the KIM IRQ (pin 4 
on the KIM expansion connector) , and 2) PB7 on 
the KIM to IRQ on the KIM (A-15 to E-4). The 
modified program starts at 0004 with a clear 
interrupt instruction. Locations 17FE and 17FF 
should contain 21 00 and 17FA and 17FB should 
have values 00 10 (or 00 1C). 
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Figure 1. Voltage-to-Frequency Converter (VFC) 
circuit . 
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Additional Comments 

The program modifications above will also extend 
Husbands' frequency counter circuit down to 10 
Hz (corresponding to 1 input interrupt in 100 
milliseconds). Since the 74121 monostable mul- 
tivibrator does not have an open collector 
output, PB7 should not be connected (along with 
the 74121 output) directly to the KIM IRQ. Two 
solutions are: 

1. Leave PB7 unconnected. The expir- 
ation of the 100 millisecond clock will 
be recognized on the next input interrupt 
after the timer has timed out . The int- 
erval timer will not interrupt the micro- 
processor, however. 

2. Connect PB7 to one input of a two input 
AND gate and the output of the monostable 
to the second input . The output of the 
AND gate should be connected to the KIM 
IRQ. The expiration of the 100 millisec- 
ond interval will now also interrupt the 
processor and will result in a faster 
response to a change in frequency values 
(from high to very low) as well as a more 
accurate low frequency count. 



The authors would like to thank Charles Husbands 
for taking the time to answer our questions and 
for pointing out the article by Laughter. 



ORG 

0004 58 CLI 
0014 8D OF 17 STA 
0024 AD 07 17 LDA 
003C 8D OF 17 STA 



0004 

clear interrupt flag 
clock in interrupt mode 
read interrupt flag bit 7 
clock in interrupt mode 



Figure 2. Changes in Husbands' program to ext- 
end the low frequency range to 10 Hz. 



HELPING MICRO HELP YOU 



MICRO is published for a number of reasons. One 
very important reason is to provide a means for 
the distribution of information about 6502 re- 
lated products. Our advertising rates are very 
low in relation to our circulation and special- 
ized audience, and we welcome your money, but 
that is not what we want to discuss here. MICRO 
offers several ways for you to get good public- 
ity - FREE ! It. will take a little work on your 
part, but the price is right. There are three 
regular ways to get coverage in MICRO: the soft- 
ware catalog, the hardware catalog, and the list 
of 6502 related companies. 

THE MICRO SOFTWARE CATALOG 

Appearing regularly since issue number 4, the 
software catalog provides a brief, standardized, 
description of currently available 6502 soft- 
ware. We were a bit surprized to find that the 
software catalog was one of the most often men- 
tioned articles in the recent MICRO Reader Feed- 
back, to participate in this catalog, you must 
follow a few simple rules: 

1. The program must be currently available, 

not "under development". 

2. You must provide the write-up following 
the standard format which is: 

Name of program: 

6502 system(s) it works on: 

Memory required: 

Language used (Assembler, BASIC,...): 

Hardware required: 

Description of program: 

Number of copies in circulation: 

Price : 

Includes: (Cassette, Source listings,...) 

Author : 

Available from: 

IHE MICRO HARDWARE CATALOG 
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issue number 6 we printed a call for hardware 
armatian for a Hardware Catalog. the formats 
the material we received was so varied, that 
have decided to impose a format for the sake 
o "-re useful presentation of the material, 
participate in this catalog, you must follow 
se rules: 



1. The product must be currently available, 
either in stock or within four weeks 
delivery on new orders. Some units must 
have already been successfully delivered. 

2. You must provide the write-up following 
the standard format which is: 

Name of product : 

6502 systems it works with: 

Other hardware reguired: 

Power requirements: 

Description of product: 

Number of units delivered to date: 

Price : 

Includes: (Manuals, Cables,...) 

Developed by: 

Available from: 

A lot of material that has been received for the 
Catalogs has not been in a useable format. We 
are not trying to make it difficult for you to 
submit your material. We are trying to make it 
easy for the readers to understand your product . 
We do not understand your product as we] 1 as you 
do and can not therefore do as good a write-up 
as you can. And, wc don't have any more time 
than you do! So, please submit your stuff in 
the requested format and we will print it. 

6502 RELATED COMPANIES 

In issue number 1 we printed a list of companies 
that wc were aware of which produced products of 
interest to the 6502 world. It is time to up- 
date the list. If you fee] that your company 
should be on the list, then send in the follow- 
ing information as soon as possible: 

Name of company: 
Address : 

Telephone: (Optional) 
Person to contact: (Optional) 
Brief list of 6502 products: (Maximum of 
five typed lines, please) 

'While the Software and Hardware Catalogs will be 
appearing regularly in every issue, this list of 
6502 Related Companies will only appear once, in 
issue number R, the Dec /Jan issue. therefore, 
send your information in as soon as possible. 
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CASSETTE TAPE CONTROLLER 



Fred Miller 

7 Templar Way 

Parsippany, NJ 07054 











The ideal tape storage facility for micro-sys- 
tems would be one in which the micro has comp- 
lete control of all tape movement and play/ 
record functions without "operator intervention" 
e.g. pushing buttons. Unfortunately most of us 
have budgets which only allow use of lower cost 
audio cassette units. Short of massive mechan- 
ical rebuilding , these units can only be extern- 
ally controlled with a motor on/off function 
after tne "operator" has set the proper record/ 
play keys . All too often we goof and press the 
wrong button, have to move cassettes from one 
unit to another, or simply forget to set up the 
units at the right time. 

The Cassette Tape Controller (CTC) described 
below offers a reasonably inexpensive capabil- 
ity as a compromise in the provision of automat- 
ic tape control for a KIM-1 system. CTC is a 
combination of a seven-IC hardware board and 
supporting software routines. It was developed 
to control two Pioneer Centrex KD-12 cassette 
units. The concept could be extended to more 
than two units or perhaps other models. 

A summary of the functions provided are: 

(1) Provide software-driven capability to start 
and stop a specific tape recorder by opening/ 
closing the "remote control" circuit of the re- 
corder (normally controlled by a switch on an 
external microphone). 

(2) Provide software-driven capability to route 
the input (record) or output (playback) signals 
as appropriate . 

(3) Provide override manual controls (toggles) 
to also accomplish (1) and (2), above. 

(4) Light panel indicators (LEDs) associated 
with the play or record functions selected for 
each cassette unit as set by software or manual 
controls . 

(5) Sense whether the selected tape recorder is 
set to play or record, or neither. 

(6) Sense the position of auxiliary toggles for 
setting software options, etc., (option 
switches. 

(7) Light indicators (LEDs) associated with the 
auxiliary toggles for operator communications. 

(8) Provide an audible "beep" under software 
control . 



CTC General Description 

The Cassette Tape Controller is a hardware/soft- 
ware facility to assist in the operation and use 
of audio cassette tape recorders for data read/ 
write functions. The hardware provides the int- 
erface from a KIM-1 to two Pioneer Centrex KD-12 
tape recorders. Besides the cassette input and 
output lines from KIM-1 four other lines (bit 
ports) are required for software control of the 
hardware . 

The software and hardware control the recorder's 
motor circuits and determine if the appropriate 
manual keys on the recorder are set correctly. 
The software can provide alternative action 
(alert the operator or try another unit) in the 
case of improperly set keys. 



The specific software illustrated below is writ- 
ten to "search" for a unit which is set in eith- 
a "read" (playback) or "write" (record) mode. 



If none is found in the desired mode, an audible 
tone is sounded and the search is continued. 
The visible indication of each of the "read" or 
"write" LEDs blinking along with the audible 
tone provides the operator with a quick clue as 
to the erroneous settings. If the appropriate 
tapes are "mounted" the operator simply depress- 
es the "requested" cassette unit key. Subse- 
quent references by the software would locate 
the preset unit without communicating to the 
operator . 

Additional facilities are built into the CTC 
hardware/software at little extra cost. These 
include the separately accessible audible tone 
and two option toggles with accompanying panel 
indicator LEDs. The toggles can be used for set- 
ting options selected by the operator and test- 
ed by the software. The associated indicators 
can also be used for some optional communication 
purposes. A third switch (momentary toggle or 
pushbutton) is used as a "break" command for 
software testing . A layout of the related hard- 
ware control panel is shown in Fig . 1 . 



READ WRITE 

© © © © 
UNIT I UNIT 2 

CASSETTE TAPE CONTROLLER 



OPTION A 



BREAK 



Figure 1 . 
Suggested Panel Layout 
for Cassette Tape Controller 



Hardware Description 

A key to the logic of CTC is the ability to sen- 
se actual cassette unit key settings. By sens- 
ing voltage levels at two externally accessible 
points in the KD-12 circuitry it is possible to 
determine one of the following states: 

(1) unit set for read (playback) 
or fast forward or rewind 

(2) unit set for write (record) 

(3) no keys depressed 



The circuit shown in Fig. 2 uses two ICs to ad- 
dress a function, one to enable and the other to 
sense results of enabling. This logic is fur- 
ther described in the comments accompanying the 
software source listing. Four non-critical DPDT 
relays are used to allocate signals and control 
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motor circuits. The additional circuits, (1) 
pulse an audible tone generator, (2) light LED 
indicators, or, (3) sense toggle switch posit- 
ions all depending upon addressed functions. 

Three bits (PB 0-2) from KIM-1 Applications Port 
B are used to address the functions. Another 
bit line (PB 3) of the same port is used to feed 
status back to KIM-1. 

The KD-12 units are operated from external batt- 
ery power (continually trickle-charged) to pro- 
vide the most stable unit operation. HYPERTAPE 
speeds are extremely reliable in this configur- 
ation. 

Software Description 

The controlling software consists of a series of 
routines which are accessible from user programs. 
The software shown in Fig. 3 is designed to 
"seek out" a cassette unit which is set for a 
given function, e.g., read. A brief study of the 
routines will show how this can be replaced or 
amended to select only a given cassette unit for 
a specific function. The additional routines 
are provided for "testing" the optional toggle 
switches, etc. Many of the routines are useful 
for other than tape cassette control, e.g., 
a JSR to BELL provides an audible "beep". 

Conclusion 

The hardware and software described have been 
working very satisfactorily on the author's 
system for well over a year. The CTC software 
(along with tape and record I/O routines based 
on the HYPERTAPE routines) have been committed 
to EPROM (2708). Access to this capability is 
easy and provides convenient operation of tape 



file processing from user software programmed in 
any language used on the KIM-1 micro (BASIC, 
Assembler, HELP, etc.). Although the operator 
still must press the keys on the cassette units, 
the CTC system can save many a "rerun" or clob- 
bered files due to careless operations. 




Author's KIM Based System 
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Figure 2. 

Cassette Tape Controller (CTC) 
Circuit Diagram 
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0010 
0020 
0030 
0C4C 
00 50 
0060 

00 70 
OOSO 
009 
0100 

01 10 
0120 
01 30 
01 40 
0150 
0160 
ID=C2 



0200 



0200 
0200 
0200 
0200 



KXFTAP ORG £0200 
******************** 

* * 

* CASSETTE TAPE * 

* CONTROLLED (CTC) * 

* EY F.MILLER * 

* * 
******************** 

*** KIM & ZERO PAGE FAF.AMETEFS *** 



PEL * 

FBEE * 

TFFCT * 

I N I T * 



51702 
5 1 70 3 
SOOEF 
S1ESC 
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0010 
0020 
00 30 
0040 

00 50 
0060 
0070 
OOSO 
009 
0100 

01 10 
0120 
0130 
CMC 

01 50 
0160 
0170 
0180 
0190 

02 00 
0210 
0220 
ID=C3 



0200 
0201 
0203 
020 6 
0208 
C2 0A 
20D 
2GF 
0212 



DS 
A9 
20 
FO 
A9 
20 
FO 
20 
CO 



0214 EA 



0215 20 
0218 4C 



02 
IB 
CC 

04 
IE 

05 
2E 
EC 



b c; 



02 



3 3 02 
8C IE 



*** TAPE CASSETTE READ ROUTINES *** 

PET APE CLE 

LEAIM £02 TEST FOP UNIT#1 READY 

JSR TFTEST FOR READ? 

EEO CREAE ...YES 

LEAIM £04 ...NO, UMIT#2 READY? 

JSP TFTEST 

BEQ CREAE ...YES 



uti 



EELL 



...NO, SO UN D S I GN AL AN D 



ENE F.LTAFE TRY AGAIN. 
CREAE NOF 



ROUTINE FOR FEAEIMG TAFE 
GOES HERE 



JSP 

REEXIT JMF 



CTLOFF TURN OFF CASSETTE MOTOF 
I N I T AN I, R E T U RN V I A K I M I N I T 



00 1 
C02C 
0030 
0040 
0050 
CC60 
0070 
OOSO 
0090 
0100 

01 10 
01 20 
01 3C 
0140 
01 50 
C160 
01 70 
0180 



021B 

021E 
0220 
0223 
0226 
0228 
C22A 



S5 
8D 
20 
AD 
29 
C5 
60 



EF 
02 
30 
02 
OF 
EF 



233 A9 7 

0235 8E 3 

0238 BE 02 

2 3E 60 



1 7 

02 
1 7 



2 2E A9 CC 

2 2D 8D 2 17 

0230 20 3C 02 



17 
17 



*** CASSETTE SUFFOFT PTNS *** 

TFTEST STA TFFCT SAVE UNIT/FCT 

STA FEE FOFT E CONTROL EATA 

JSF EELAY ALLOU RELAY SETTLE 

LLA FEE CK BITS 0-3 = TO 

ANLIM SOF ORIGINAL UNIT/FCT 
CMP TFFCT 

RTS EOUAL MEANS UNIT F.EAEY 



EELL 



LEAIM SCO 
STA FEE 



:ef.o fct sets tone 



JSR LELAY V'AIT, RESET i EXIT 

CTLOFF LEAIM S07 EITS 0-2 TO 0/F 

STA FEEE 

STA FEE SET TO FCT#7 (OFF) 
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0190: 
0200; 
0210: 
0220: 
02 30: 
0240: 
02 50: 
0260: 
0270: 
0280: 
0290: 
0300: 
0310; 
0320: 
ID=04 



023C A9 FF 

023E 8D 07 

0241 2C 07 

0244 10 FB 
0246 60 



0247 
024A 
024E 
024E 
0250 
02 52 
0253 



20 
18 
AD 
29 
DO 
38 
60 



02 
08 
01 



DELAY LEAIM SFF 

17 ETA £1707 SET TIMEE TO 1/4 SEC 

17 EIT £1707 

BPL EEL AY +05 

ET S 



33 02 EEKCK J SF. CTLOFF ENSURE OFF 
CLC 
17 LEA FEE 

ANEIM £08 EIT 3 HIGH MEANS MO EFK 

EKE EKEXIT 
SEC 
BKEXIT F.TS NO CAREY MEANS MO EF.K 



0010: 
0020: 
0030; 
0040: 
00 50: 
00 60: 

00 70! 
0080: 
009 C: 
0100: 

01 10: 
0120: 
0130: 
0140: 
0150: 
0160: 
0170: 
0180: 
0190: 
0200: 
0210; 
0220: 
ID=05 



0254 
0255 
0257 
02 5A 
025C 
025E 
0261 
0263 
0266 



D8 
A9 
20 
FO 
A9 
20 
FO 
20 
DO 



2 66 EA 



01 

IB 
OC 
03 
IE 

05 

2B 
EC 



0269 20 33 
026C 4C SC 



*** CASSETTE WHITE ROUTINE *** 

VET APE CLE 

LEAIM SOI TEST FOF UKIT#1 HEADY 

02 JSF. TFTEST FOF. VF.ITE? 

SEC CVRITE . • .YES 

LEAIM £03 ...NO, TEST UNIT#2 

02 JSR TFTEST 

BEG CVEITE ...YES 

02 JSF. EELL ...NO, SOUND SIGNAL AND TRY 

ENE VHTAFE AGAIN 

C VF.ITE NOP 



CASSETTE VF.ITE ROUTINE 
GOES HERE 



02 JSF. CTLOFF TVF.K OFF MOTORS 

IE JMF I KIT AND RETURN VIA KIM 



0010; 
0020; 
0030: 
0040; 
0050: 
0060: 
0070: 

008 C: 

009 0: 
0100; 
0110: 
0120: 
0130: 
0140: 
IE- 



026F A9 
02 71 DC 



0273 
0275 
0276 
2 79 
2 7A 
027E 
027E 
0280 
028 1 



A9 
48 
20 
68 
20 
18 
EO 
38 
4C 



06 

02 



01 



02 



IE 02 



33 02 



*** ALT. SV TEST & EIGHT *** 

TSTSVA LEAIM S06 SET FOF ALT.SV #1 

ENE TSTSVE +02 

TSTSVE LEAIM £05 SET FOF. ALT.SV #2 

FKA SAVE COLE 

JSF. CTLOFF INITL FOFTS 
FLA RETRIEVE CODE 

JSR TFTEST AM L TEST St.' 
CLC 

EKE TSTX IF NOT E^UAL 

SEC MEAN? SV IS NOT SET 

TSTX JMF CTLOFF CARRY MEANS SV 'OK' 
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APPLE II HIGH RESOLUTION GRAPHICS 
HEMORY ORGANIZATION) 

Andrew H. Eliason 

28 Charles Lane 
Falmouth, MA 02540 
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One of the most interesting, though neglected, 
features fo the Apple II computer is its ability 
to plot on the television screen in a high res- 
olution mode . In this mode , the computer can 
plot lines, points and shapes on the TV display 
area in greater detail than is possible in the 
color graphics mode (GR) which has a resolution 
of 40 x 48 maximum. 

In the high resolution (HIRES) mode, the compu- 
ter can plot to any point within a display area 
280 points wide and 192 points high. While this 
resolution may not seem impressive to those who 
have used plotters and displays capable of plot- 
ting hundreds of units per inch, it is nonethe- 
less capable of producing a very complex graphic 
presentation'. This may be easily visualized by 
considering that a full screen display of 24 
lines of 40 characters is "plotted" at the same 
resolution. An excellent example of the HIRES 
capability is included in current Apple II ad- 
vertisements . 

Why, then, has reletively little software app- 
eared that uses the HIRES features? One of the 
reasons may be that little information has been 
available regarding the structure and placement 
of words in memory which are interpreted by HI- 
RES hardware. Information essential to the user 
who wishes to augment the Apple HIRES routines 
with his own, or to explore the plotting possib- 
ilities directly from BASIC. In a fit of cur- 
iosity and Apple-insomnia, I have PEEKed and 
POKEd around in the HIRES memory area . The fol- 
lowing is a summary of my findings. Happy plot- 
ting! 

Each page of HIRES Graphics Memory contains 8192 
bytes. Seven bits of each byte are used to ind- 
icate a single screen position per bit in a ma- 
trix of 280H x 192V. The eighth bit of each 
byte is not used in HIRES and the last eight 
bytes of every 128 are not used. 

The bits in each byte and the bytes in each 
group are plotted in ascending order in the fol- 
lowing manner. First consider the first two 
bytes of page 1. (Page 2 is available only in 
machines with at least 24K) . 



BYTE 



i 1 92 



J 1 93 



SCREEN 

POSITION 1 2 3 1 5 6 7 3 9 10 11 12 13 



BIT 



0123H56012 



V G V G V G I VI G V G V G V 



(Bit 7 not used) 7 



V = VIOLET 
G = GREEN 



Figure 1 represents the screen position and res- 
pective bit & word positions for the first 14 
plot positions of the first horizontal line. If 
the bit is set to 1 then the color within the 
block will be plotted at the position indicated. 
If the bit is zero, then black will be plotted 
at the indicated position. It can be seen that 
even bits in even bytes plot violet, even bits 
in odd bytes plot green and vice versa. Thus 
all even horizontal positions plot violet and 
all odd horizontal politions plot green. To 
plot a single white point, one must plot the 
next higher or lower horizontal position along 
with the point, so that the additive color prod- 
uced is white. This is also true when plotting 
single vertical lines. 

The memory organization for HIRES is, for design 
and programming considerations, as follows: 

Starting at the first word , the first 40 bytes 
(0-39) represent the top line of the screen (40 
bytes x 7 bits = 280). The next 40 bytes, how- 
ever, represent the 65th line (i.e., vertical 
position 64). The next 40 bytes represent the 
line at position 128 and the next 8 bytes are 
ignored. The next group of 128 bytes represent 
three lines at positions 8, 72 and 136, the next 
group at positions 16, 80 and 142, and so on un- 
til 1024 bytes have been used. The next 1024 
bytes represent the line starting at vertical 
position 1 (second line down) in the same man- 
ner. Eight groups of 1024 represent the entire 
screen. The following simple porgram provides a 
good graphic presentation as an aid to under- 
standing the above description. Note that there 
is no need to load the HIRES machine language 
routines with this program. Set HIMEM:81Q1 
before you type in the program . 



100 REM SET HIMEM:3191 

110 REM HIRES GRAPHICS LEARNING AID 

120 POKE -16304,0: REM SET GRAPHICS MODE 

130 POKE -16297,0: REM SET HIRES MODE 

140 REM CLEAR PAGE - TAKES 20 SECONDS 

150 FOR 1=8192 TO 1 6383 : POKE 1,0: NEXT I 

160 INPUT "ENTER BITE (1 to 127)", BYTE 

170 POKE -16302,0: REM CLEAR MIXED GRAPHICS 

180 FOR J=8192 TO 16383: REM ADDRESS' 

190 POKE J, BYTE: REM DEPOSIT BYTE IN ADDRESS 

200 NEXT J 

210 POKE -16301,0: REM SET MIXED GRAPHICS 

220 GOTO 160 

999 END 



An understanding of the above, along with the 
following equations will allow you to supplement 

the HIRES graphics routines for memory efficient 
programming of such things as: target games, 3D 
plot with hidden line supression and 3D rota- 
tion, simulation of the low resolution C=3CRN 
(X,Y) function, etc. Also, you may want to do 
some clever programming to put Flags, etc., in 
the unused 8128 bits and 512 bytes of memory! 
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HI RES Graphics Equations and Algorithms 
Where : 

FB = ADDRESS OF FIRST BYTE OF PAGE. 

PAGE1 =8192 PAGE 2 = 16384 
LH = HORIZONTAL PLOT COORDINATE. TO 279 
LV = VERTICAL PLOT COORDINATE. TO 191 
BV = ADDRESS OF FIRST BYTE IN THE LINE OF 

40 
BY = ADDRESS OF THE BYTE WITHIN THE LINE 

AT BV 
BI = VALUE OF THE BIT WITHIN THE BYTE 

WHICH CORRESPONDS TO THE EXACT POINT 

TO BE PLOTTED. 

Given: FB,LH,LV 

BV = LV MOD 8 » 1024 + (LV/8) MOD 8 * 128 

+ (LN/64) * 40 + FB 
BY = LH/7 + BV 
BI = 2~(LH MOD 7) 



To Plot a Point (Without HIRES Plot Routine): 

LH - X MOD 280 : LV = Y MOD 192 (or) 

LV = 192-Y MOD 192 
FB = 8192 
BV = LV MOD 8 « 1024 + (LV/8) MOD 8 « 128 + 

(LV/64) * 40 + FB 
BY = LH/7 + BV 
BI = 2*(LH MOD 7) 
WO = PEEK (BY) 

IF (WO/BI) MOD 2 THEN (LINE NUMBER + 2) 
POKE BY, BI + WO 
RETURN 

To Remove a Point, Substitute: 

IF (WO/BI) MOD 2 = THEN (LINE NUMBER + 2) 
POKE BY, WO-BI 

To Test a Point for Validity, the Statement: 

"IF (WO/BI) MOD 2" IS TRUE FOR A PLOTTED POINT 
AND FALSE (=0) FOR A NON PLOTTED POINT. 



RIVERSIDE ELECTRONIC DESIGN'S KEM AND MVM-1024: 

A USER'S EVALUATION 



Marvin L. De Jong 

Dept . of Math-Physics 

The School of the Ozarks 

Pt. Lookout, MO 65726 



The price and availability of a variety of 
memory and application boards for the S 100 bus 
will make many KIM-1 owners think about expand- 
ind their systems to be compatible with this 
bus. The KIM Expansion Module (KEM) does the 
trick. In addition, one of the most attractive 
I/O modes is the keyboard/video monitor team. 
Riverside's MVM-1024, which interfaces neatly 
with the KEM, provides all the necessary cir- 
cuitry to provide a 16 line by 64 character dis- 
play on a video monitor. Programs which give 
the user a variety of display functions (homing 
the cursor, backspace, erase-a-line , etc.) and 
allow the user to communicate with the computer 
by way of the keyboard are also available from 
Riverside. Finally, all of the hardware and 
software is well documented in a series of 
application notes. 

Space does not allow a complete description of 
all of the packages mentioned above. The reader 
should obtain the application notes and descrip- 
tions from Riverside if he is contemplating ex- 
pansion. Summarily, the KEM buffers all of the 
address and data lines from the KIM-1 , separat- 
ing the latter into IN and OUT busses as requir- 
ed by the S 100; provides the necessary memory- 
mapped I/O ports for the keyboard, cursor, and 
video display; provides the logic for the S 100 
signals; and provides four locations for the IK 
2708 EPROMs, in which may be stored display/ 
monitor programs, PROM programmer software, or 
your favorite games . 



The KEM does all of this without affecting any 
of the I/O ports on the KIM-1. That is, PAD and 
PBD may still be accessed from a connector on 
the KEM. The MVM-1024 contains its own memory 
and does not use any of the memory on the KIM-1. 
ASCII from the keyboard is loaded from address 
13F8. To display a character, ASCII code for 
the character is stored in location 13FB. The 
cursor is controlled by the contents of two 
locations, 13F9 which contains a six bit word 
which determines the location of the character 
in a line, and 13FA which contains a four bit 
word which determines the line being used. Of 
course, the display/monitor programs do all of 
the necessary loading (LDA) and storing (STA) 
for you, but it is particularly easy to write 
short programs or subroutines which read the 
keyboard and/or output data on the video monitor 

The danger in writing an equipment evaluation 
like this is in making it so concise that it is 
Greek to everyone except the hardened computer 
addict. So, I will conclude by saying that I 
was very satisfied with the performance of the 
Riverside hardware and software. I particularly 
liked their use of premium components such as LS 
TTL, the fact that the KIM-1 1/0 ports are still 
available for applications, the keyboard polling 
software which allows the user to use NMI or 
IRQ interrupts for applications and the 4K of 
PROM space. Also, it is much easier to enter 
and de-bug programs with the display/monitor 
software. My only criticism is that it is not 
easy to lay out the system in a small package 
form . 
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A DIGITAL CLOCK PROGRAM FDR THE SYM-1 

Chris Sullivan 

9 Galsworthy Place 

Bucklands Beach 

Aukland, New Zealand 







The SYM-1 is a one board hobbyist computer 
similiar to the KIM but with a number of 
additional features. Since buying the SYM-1 
I have had a great deal of fun playing a- 
round with both the software and hardware 
sides of it. The SYM-1 monitor, Supermon , is an 
incredible monitor in 4K ROM, some of it's sub- 
routines are called by the following program. 

This program started off as a lesson in 
familiarity with the 6502 instruction set and 
using the Supermon subroutines to advantage , 
but the present version has been modified many 
times in order to increase the clock accuracy 
and, as my knowledge of the 6502 instruction set 
grows, increase coding efficiency. To use it 
one should start execution at :200. Then enter 
an "A" or "P" (Shift ASCII 5 0) to signify AM 
or PM. Then enter the hours (two digits), the 
program then outputs a space to separate the 
hours from the minutes. Finally enter 2 
digits to signify the minutes, the program will 
then increment the minutes by 1 , and begin the 
clock sequence. This slight quirk makes it 
easier to set the clock using another clock, set 
up the "A" or "P" , hours and first digit of the 
minutes, then enter the last digit of the 
minutes as the seconds counter of your setting 
clock reaches 0. 

There is another slight quirk in that the clock 

counts "All 59", "A12 00","A12 01", , 

"A12 59", "P01 00","P01 01" This simpli- 
fies the programming and means that 12:30 near 
midday is in fact, 12:30 AM according to this 
clock! However this is not likely to confuse 
many people. 

After setting up the initial time , the program 
adds 1 to the minutes and then carries on any 
carry into the hours, possibly changing "A" to 
npii or vice versa. This section of the program 
could be made more efficient with full exploita- 



tion of the 6502 instruction set. The last sec- 
tion in the program is a 1 minute delay. I have 
rewritten this section many times in a search 
for an accurate 1 minute delay. The first part 
is a double loop which also scans the clock dis- 
play, this loop takes about 59-8 seconds. The 
second part is a double loop to "tweak" the de- 
lay up to 60 seconds and consists of 2 delays 
using the onboard 6532 timer. This timer is in- 
itialised in 1 of 4 memory locations, specifying 
■=■1024, *64, *8, or *1 timing, e.g., the location 
to write to if one wants ^1024 timing is A417- 
This location thus initialised is counted down 
in the 6532. The program reads this value until 
it becomes negative, at which time the delay is 
over . 

Some improvements to the program could be made , 
for example better coding in the increment min- 
utes section. One could also add an alarm fea- 
ture, possibly using the on board beeper. The 
The section to update the time by one minute 
could be used as a part of a background real 
time clock, being called by a once-a-minute 
hardware interupt generated by an on board 6522 
timer chip. Once a minute, processing would be 
interupted for 100 cycles or so in order to up- 
date the real time clock. Such clocks have many 
uses, one of which is to ensure that certain 
number-crunching programs don't get tied down 
in big loops. 

This improved version occupies less RAM by using 
jumps to INBYTE rather than INCHAR and messy bit 
manipulations. The delay routine has been 
improved to use the on board 6532 timer , and 
also give greater resolution and hence greater 
timing accuracy. 

Editor's Note: This program is present primar- 
ily for its value in showing how to access the 
SYM's monitor for some of the routines. It is 
not an "optimal" program for a 24 hour clock, 
but should be a good starting point for owners 
of SYMs who wish to write similar programs. 



SYM-1 ELECTRONIC CLOCK 



BY CHRIS SULLIVAN AUGUST 27, 1978 











ORG 


$0200 












SPACE 


• 


$0020 


ASCII SPACE 








ACCESS 


• 


$8B86 












INCHAR 


* 


$8A1B 












INBYTE 


• 


$81D9 












0UTCHR 


• 


$8A47 












OUTBYT 


• 


$82FA 






0200 20 


86 


8B 


BEGIN 


JSR 


ACCESS 






0203 20 


1B 


8A 




JSR 


INCHAR 


GET 


A OR P 


0206 85 


00 






STAZ 


$00 






0208 18 








CLC 








0209 20 


D9 


81 




JSR 


INBYTE 


GET 


HOURS 


020C 85 


01 






STAZ 


$01 






020E A9 


20 






LDAIM 


SPACE 


SPACE CHARACTER 


0210 20 


47 


8A 




JSR 


OUTCHR 


OUTPUT A SPACE 


0213 20 


D9 


81 




JSR 


INBYTE 


GET 


MINUTES 


0216 85 


02 






STAZ 


$02 






0218 F8 








SED 




SET 


DECIMAL MODE FOR REMAINDER OF PROGRAM 
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HAVING SET THE INITIAL TIME (LESS 1 MINUTE) 
UPDATE THE TIME: 



0219 18 






TIMLOP 


CLC 






021 A A5 


02 






LDA2 


$02 


GET MINUTES 


02 1C 69 


01 






ADCIM $01 


INCREMENT 


021 E 85 


02 






STAZ 


$02 




0220 38 








SEC 






0221 E9 


60 






SBCIM $60 


TEST IF NEW HOUR 


0223 F0 


03 






BEQ 


TIMEX 




0225 4C 


50 


02 




JMP 


NORSET 


IF NOT A NEW HOUR 


0228 A9 


00 




TIMEX 


LDAIM $00 




022A 85 


02 






STAZ 


$02 


SET MINUTES TO 00 


022C 18 








CLC 






022D A5 


01 






LDAZ 


$01 




022F 69 


01 






ADCIM $01 


INCR HOURS 


0231 85 


01 






STAZ 


$01 




0233 38 








SEC 






0231 E9 


13 






SBCIM 


$13 


TEST HOURS = 13 


0236 FO 


03 






BEQ 


TIMEY 




0238 4C 


50 


02 




JMP 


NORSET 




023B A9 


01 




TIMEY 


LDAIM 


$01 


YES, SET HOURS TO 1 


023D 85 


01 






STAZ 


$01 




023F A5 


00 






LDAZ 


$00 


GET A OR P 


0241 49 


50 






EORIM 


$50 


ASCII P 


0243 FO 


07 






BEQ 


TIMEZ 


IS 00 = ASCII P? 


0245 A9 


50 






LDAIM 


$50 


NO, THEN SET 00 TO P 


0247 85 


00 






STAZ 


$00 




0249 4C 


50 


02 




JMP 


NORSET 




024C A9 


41 




TIMEZ 


LDAIM 


$41 


YES, THEN SET 00 TO A 


024E 85 


00 






STAZ 


$00 




0250 A5 


00 




NORSET 


LDAZ 


$00 


GET A OR P 


0252 20 


47 


8A 




JSR 


OOTCHR 




0255 A5 


01 






LDAZ 


$01 


GET HOURS 


0257 20 


FA 


82 




JSR 


OUTBYT 




025A A9 


20 






LDAIM 


SPACE 




025C 20 


47 


8A 




JSR 


OUTCHR 




025F A5 


02 






LDAZ 


$02 


GET MINUTES 


0261 20 


FA 


82 




JSR 


OUTBYT 




0264 D8 








CLD 




CLEAR DECIMAL MODE 


0265 A2 


CO 






LDXIM 


$C0 


SETUP FOR ALMOST 60 SEC WAIT 


0267 AO 


7D 




WAITA 


LDYIM $7D 


COUNTER 


0269 A9 


01 




WAITB 


LDAIM $01 


NON-DISPLAYING CHARACTER 


026B 20 


47 


8A 




JSR 


OUTCHR 


REFRESH DISPLAY 


026E 88 








DEY 






026F DO 


F8 






BNE 


WAITB 


LOW ORDER COUNTER 


0271 CA 








DEX 




HIGH ORDER COUNTER 


0272 DO 


F3 






BNE 


WAITA 




0274 A2 


02 






LDXIM 


$02 


TWEAK TIME UP TO 60 SECONDS 


0276 A9 


4D 




WAITC 


LDAIM $4D 




0278 8D 


17 


A4 




STA 


$A417 


DIVIDE BY 1024 TIMER 


027B AD 


06 


A4 


WAITD 


LDA 


$A406 


REGISTER OF 6532 


027E 10 


FB 






BPL 


WAITD 




0280 CA 








DEX 






0281 DO F3 






BNE 


WAITC 




0283 F8 








SED 






0284 4C 


19 


02 




JMP 


TIMLOP 





VERIFY from 0200 thru 0286 is 356F. 



The following subroutines called 
the SYM-1's SUPERMON monitor: 



form part of 



ACCESS Enables the user program to write to 
system RAM, i.e. the RAM contained on the 6532. 
It is necessary to call ACCESS before calling 
moat of the other system subroutines. 

INCHAR Get one ASCII charcter from the input 
device (here the hex keypad) and return with it 
in the A register. 

INBYTE Get two ASCII characters from the input 
device, using INCHAR and pack into a single byte 
in the A register . 



OUTCHR Output the ASCII data in the A register 
to the output device (here the six digit LED 
display) . 

OUTBYT Convert the byte in the A register into 
two ASCII characters and output these to the 
output device. 

Location A417 is used to initialise the 6532 
timer to count down from the value stored in 
A417, with a divide by 1024 cycles. Thu3 the 
timer register on the 6532 is decremented by one 
every 1024 clock cycles. The timer register 
sits at location A406 , and the time is consider- 
ed to be "up" when the value at A406 becomes 
negative. 
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PEEKING AT PET'S BASIC 







Harvey B. Herman 
Chemistry Department, U. of N. 
Greensboro, NC 27412 



Carolina 



Commodore, for reasons best known to them, has 
seen fit to prevent users from PEEKing at PET's 
ROM located, 8K BASIC. If you try to run a pro- 
gram that says, PRINT PEEK (49152), the answer 
returned will be zero instead of the actual ins- 
truction or data in decimal. Disassemblers 
written in BASIC will therefore not work prop- 
erly if they use the PEEK command and try to 
disassemble 8K BASIC (decimal locations 49152 to 
57520). I was curious to see how the PET's 8K 
BASIC was implemented and decided to write a ma- 
chine language program which circumvents the re- 
striction . 

A listing of the above program which I have cal- 
led MEMPEEK follows. It is decimal 22 bytes 
long, relocatable, and can be stored into any 
convenient area of memory. I have chosen to use 
the area devoted to the second cassette buf- 
fer starting at hex 33 A. As long as the second 
cassette is not used the program should remain 
inviolate until the PET is turned off. Storing 
the program in memory is trivial if a machine 
language monitor is available. Otherwise con- 
vert the hex values to decimal and manually poke 
the values into memory. As of this writing, 
Commodore's free, long-awaited, TIM-like monitor 
has not arrived but I continue to hope. 

MEMPEEK utilizes the user function (USR) which 
jumps to the location stored in memory locations 
1 and 2. If MEMPEEK is stored in the second 
cassette buffer (hex 33A) initialize locations 
1 and 2 to decimal 58 and 3 respectively. MEM- 
PEEK was written so that the user function re- 
turns the decimal value of the instruction given 
by its argument (address). For example, if you 
want to peek at an address less than decimal 
32768 (not part of the BASIC ROMs) use in your 
program Y = USR (address) , where address is the 
location of interest and the value of Y is set 
to the instruction at that address. Since the 
argument of the user function is limited to 
+32767, use address -65536 for addresses larger 
than 32768. Thus to look at locations in the 
BASIC ROMs (all above 32768 and where MEMPEEK is 
particularly useful) use Y=USR (address -65536). 
It is not possible to look at location 32768 
(the start of the screen memory) with this pro- 
gram but this should prove no handicap as PEEK 
could be used . 



MEMPEEK takes advantage of two subroutines in 
the PET operating system. The first (located at 
hex D0A7) takes the argument (address) in the 
floating point accumulator (conveniently placed 
there by the user function) and converts it into 
a two byte integer stored at hex B3 and B4. 
Since I choose to use an indirect indexed instr- 
uction to find the desired instruction the order 
of the two bytes at hex B3 (MSB) and B4 (LSB) 
need to be reversed. The second subroutine at 
hex D278 converts a 2 byte integer representing 
the instruction from the accumulator (MSB) and 
the Y register (LSB) to floating point form and 
stores it in the floating point accumulator. 
This value, the instruction, is returned to 
BASIC as the result of the user function. 

The program, MEMPEEK, is fairly simple but would 
be unnessary if the arbitrary restriction on 
PEEKing at BASIC was removed. The restriction 
makes no sense to me as even a relatively inex- 
perienced machine language programmer (myself) 
was able to get around it. This type of program 
would of course not be difficult for competitors 
of Commodore to write. I wrote this program for 
the fun of it , to try to understand how BASIC 
works and in the hope others will find it use- 
ful. Furthermore, I hope I can discourage other 
manufacturers like Commodore from trying to keep 
hobbyists from a real understanding of their 
software by arbitrary restrictions. 



MEMPEEK Program 



033A 




1 


»=$33A 




033A 


20A7D0 


2 


JSR $D0A7 ; 


convert to integer 


033D 


A6B3 


3 


LDX $B3 ; 


interchange - 


033F 


A4B4 


4 


LDY $B4 ; 


$B3 and $B4 


0341 


86B4 


5 


STX $B4 




0343 


84B3 


5 


STY $B3 




0345 


A200 


7 


LDX #0 ; 


initialize index 


03^7 


A1B3 


8 


LDA ($B3,X) 


; find instruction 


0349 


A8 


9 


TAY 




034A 


A900 


10 


LDA #0 




031C 


2078D2 


11 


JSR $D278 ; 


convert to floating 


034F 


60 


12 


RTS ; 


return to BASIC 


0350 




13 


END 






MICRO GOES TO EUROPE 

In order to better serve the European 
6502 market, MICRO has selected L.P. 
Enterprises to be its sole distributor 
in Britain and Europe. All sales to 
dealers and all new subscriptions will 
be handled by L.P. Enterprises. This 
will result is significantly lower cost 
of MICRO. The prices of MICRO will be: 



Single Copy Retail: approx. $2.00 
Six Copy Subscription: $10.00 

Tor subscription or dealer information, 
please contact: 

L.P. Enterprises 

313 Kingston Road, Ilford 

Essex, IG1 1PJ England 
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KIMBASE 



Dr. Barry Tepperman 

25 St. Mary St., No. 411 

Toronto, Ontario M4Y 1R2 

Canada 



KIMBASE is an application program written in the 
6502 microprocessor machine language , designed 
to make use of the monitor subroutines and mem- 
ory configuration of the KIM-1 microcomputer, 
for conversion of unsigned integers from one 
base to another. The input integer (designated 
NUMBER is to be no greater than 6 digits in len- 
gth; large 6-digit integers may cause overflow 
in the multiplication subroutines with consequ- 
ent errors in conversion. The base to be con- 
verted from (designated BASED and to be con- 
verted to (BASE2) are each in the range from 02h 
to 10(j; the lower limit is set by mathematical 
reality and the upper by the limited enumer- 
ation available from the KIM-1 keypad . 

The program is started by placing NUMBER, lowest 
order byte last, in page zero HC-HE, BASE1 (exp- 
ressed in hexadecimal) in HA, and BASE2 (also in 
hexadecimal) in 4B. The program starts at 0200, 
and will light up the KIM-1 LED display with 
either an error message (according to an error 
flag stored in zero page 02, called ERROR), or 
a result display with the input data and a final 
result up to l8 H digits in length (RESULT stored 
in 03-0E) in successive segments in a format 
to be discussed below, or a combination of both 
displays, in an endless loop until the RS key is 
pressed . 

Program Function 

After initialization of data workspace, several 
tests of input data validity are conducted. 
KIMBASE recognizes four error states: 

a) NUMBER will remain same after conversion 
(i.e. NUMBER=00000x where x is less than either 
base). KIMBASE sets ERR0R=01, RESULT=NUMBER, 
and shows both error and result displays. 

b) Either or both bases are outside the permis- 
sable limits of 02-10 H . KIMBASE resets bases 
under 02 to equal 02 and bases exceeding 10nto 
equal 1 0^, and executes program to display res- 
ult without an error display. 

c) BASE1=BASE2. KIMBASE sets ERR0R=02, 
RESULT=NUMBER, and shows error and result dis- 
plays . 

d) NUMBER enumeration is impermissable , as one 
or more digits =BASE1 (e.g., attempting NUM- 
BERS 1C352 A with BASE 1=05). KIMBASE sets ERR0R= 
03, shows error display, and aborts further exe- 
cution . 

Note that error states "a" and "c" , above, are 
not mutually exclusive, and that KIMBASE sets 
the error flag ERROR and goes to the appropriate 
response routine after only one positive test. 
Errors are displayed as a continuous flashing 
LED readout "ErrorY" where Y=ERR0R. 



Following the test routines, if BASE1^10 H , KIM- 
BASE converts NUMBER into its hexadecimal equiv- 
alent by successive generation of powers of 
BASE1, multiplication of the appropriate power 
by the individual digits of NUMBER (remapped by 
masking and shifting into array N) , and suc- 
cessive addition of all the hexadecimal prod- 
ucts . This intermediate result is placed in 
array HEXC0N. A successive loop algorithm was 
used for multiplication rather than a shift-and- 
binary-add algorithm for economy of coding. 



HEXC0N 



<_ N(Y) • BASE1 (y_l) 
y=1-6 



10 



This calculation is bypassed and NUMBER entered 
directly into HEXC0N if BASE1=10 H . 

After the conversion to hexadecimal , if BASE2= 
10 H , KIMBASE sets RESULT=HEXCON and the result 
display is initiated. If BASE2^10 H , HEXC0N is 
converted into BASE2 by the common successive 
division procedure by BASE2 with mapping of rem- 
ainders through an intermediate array into 
RUSULT. 

Results are displayed on the KIM-1 6-digit dis- 
play as successive 1-second displays of NUMBER, 
BASE1 and BASE2, and RESULT divided into 6-digit 
segments , in the format : 

NNNNNN ( NUMBER 1 -NUMBER 3) 

IlbbOO (II=BASE1; 00=BASE2) 

RRRRRR ( RESULT 1-RESULT3) 

RRRRRR (RESULTH-RESULT6) 

RRRRRR (RESULT7-RRSULT9) 

RRRRRR (RESULTA-RESULTC) 

which loops endlessly. Where ERROR=01 or 02, 
the error message precedes the result display, 
and loops endlessly in the display. 

All intermediate arrays and products have been 
retained in the zero page data workspace to fac- 
ilitate any debugging or further elaboration of 
the program that other users may find necessary. 

Users of non-KIM 6502-based microcomputers may 
implement KIMBASE easily with appropriate relo- 
cation of program and workspace (if necessary) 
and replacement of the display subroutines 
( SHOWER-TIMER 1 , SH0RES-TIMER2) with appropriate 
machine-dependant output routines (or by BRK in- 
structions with manual interrogation of the ap- 
propriate arrays to determine output). 



KIMBASE - MAIN PROGRAM LISTING 

*************** this section initializes data workspace and constants ********** 



ZEROl 



CLD 

LDX $#48 

LDA $#00 

STA ARRAY, X 

DEX 

BNE ZEROl 

LDA $#0F 

STA MASK1 

LDA $#F0 

STA MASK2 



00 


D8 




01 


A2 


48 


03 


A9 


00 


05 


95 


01 


07 


CA 




08 


D0 


F9 


0A 


A9 


0F 


0C 


85 


0F 


0E 


A9 


F0 


10 


85 


10 



WmR® 



select binary mode 

set workspace byte counter 

zero common workspace 
decrement counter 
if ^0 loop back 

set MASK1=0F 

set MASK2=F0 



7:49 



LDA $#05 

STA PWR 

LDX $#FF 
TXS 



12 A9 05 

14 85 00 

16 A2 FF 

18 9A 



set PWR=05 

set stack. pointer=FF 



*************** th -[ s sec tion tests input data validity ************************* 



TST1NR 


LDA 


$#00 




CMP 


NUMBERl 




BNE 


TST1BS 




CMP 


NUMBER2 




BNE 


TST1BS 




LDA 


NUMBER3 




CMP 


BASE2 




BCC 


CORR1 




JMP 


TSTlBS 


C0RR1 


LDA 


$#01 




STA 


ERROR 




JMP 


CORR3A 


TST1BS 


LDX 


$#02 


TST1B2 


LDA 


BASE,X 




CMP 


$#02 




BCC 


CORR2A 




CMP 


$#11 




BCC 


RESETl 


C0RR2B 


LDA 


$#10 




STA 


BASE,X 




JMP 


RESETl 


C0RR2A 


LDA 


$#02 




STA 


BASE,X 


RESETl 


DEX 






BNE 


TST1B2 


TST2BS 


LDA 


BASE2 




CMP 


BASE1 




BEQ 


C0RR3 




JMP 


TST3BS 


C0RR3 


LDA 


$#02 




STA 


ERROR 


C0RR3A 


LDX 


$#03 




LDY 


$#0C 


C0RR3B 


LDA 


NUMBER, X 




STA 


RESULT, Y 




DEY 






DEX 






BNE 


C0RR3S 




JSR 


SHOWER 


TST3BS 


LDA 


BASEl 




CMP 


$#10 




BCC 


TST2NR 




LDX 


$#03 


HEXMAP 


LDA 


NUMBER, X 




STA 


HEXCON,X 




DEX 






BNE 


HEXMAP 




JMP 


HEXl 


TST2NR 


LDA 


BASEl 




STA 


BSTR1 




ASL 


ASL 




ASL 


ASL 




STA 


BSTR2 




LDY 


$#02 


TLP2 


LDX 


$#03 


TLP1 


LDA 


NUMBER, X 




AND 


MASK,Y 




CMP 


BSTR,Y 




BCC 


TRESET 




JMP 


C0RR4 


TRESET 


DEX 






BNE 


TLP1 




DEY 






BNE 


TLP2 




JMP 


REMAP 


CORR4 


LDA 


$#03 




STA 


ERROR 


- 


JSR 


SHOWER 



19 
IB 
ID 
IF 
21 
23 
25 
27 
29 
2C 
2E 
30 
33 
35 
37 
39 
3B 
3D 
3F 
41 
43 
46 
48 
4A 
4B 
4D 
4F 
51 
53 
56 
58 

5A 
5C 
5E 
60 
63 
64 
65 
67 
006A 
6C 
6E 
70 
72 
74 
76 
77 
79 
7C 
7E 
80 
82 
84 



8A 
8C 
8F 
92 
94 
97 
98 
9A 

9B 
9D 
A0 
A2 
A4 



A9 00 

C5 4C 

D0 14 

C5 4D 

D0 10 

A5 4E 

C5 4B 

90 03 

4C 33 

A9 01 

85 02 

4C 5A 

A2 02 



TEST - ERROR STATE "a" 
NUMBER1=00? 
no? go to next test 
NUMBER2=00? 
no? go to next test 

NUMBER3< BASE2? 
yes? go to correction routine 
02 go to next test 

set ERROR=01 
02 and jump to C0RR3A 

TEST - ERROR STATE "b" 



B5 


49 






C9 


02 




BASE(X) < 02? 


90 


0B 




yes? go to correction routine 


C9 


11 




BASE(X)> 11? 


90 


0B 




no? bypass correction 


A9 


10 






95 


49 




otherwise set BASE (X) =10 


4C 


4A 


02 


and bypass next correction 


A9 


02 






95 


49 




set BASE (X) =02 


CA 






decrement loop counter 


D0 


E8 




and go back if /0 


A5 


4B 
4A 




TEST - ERROR STATE "c" 


C5 


BASE2=BASEl ? 


F0 


03 




yes? go to correction routine 


4C 


6A 


02 


otherwise bypass 


A9 


02 






85 


02 




set ERROR=02 


A2 


03 






A0 


0C 






B5 


4B 




read NUMBER 


99 


02 


00 


into RESULT 


88 






decrement counters 


CA 








D0 


F7 




and loop until complete 


20 


A0 


00 


display error message 


A5 


4A 






C9 


10 




BASEl=10? 


90 


0C 




no? go to next test 


A2 


03 






B5 


4B 




yes? read NUMBER 


95 


25 




into HEXCON 


CA 








D0 


F9 




for all 3 bytes 


4C 


IF 


03 


and bypass hex conversion 


A5 


4A 




TEST - ERROR STATE "d" 



85 11 

0A 0A 

0A 0A 

85 12 

A0 02 . 

A2 03 

B5 4B 

39 0E 

D9 10 

90 03 

4C A0 
CA 

D0 F0 
88 

D0 EB 

4C A7 

A9 03 

85 02 

20 A0 



store BASEl 

and left shift 4 bits 
to store BSTR2= (10*BASEl) 



isolate each digit NUMBER (X) 
00 by masking 
00 and compare with BSTR 

if less, reset loop 
02 otherwise impermissable - correct 

decrement counter NUMBER 

and repeat for corresponding digits 

decrement counter BSTR/MASK 

and repeat for remaining digits 
02 go to REMAP 

set ERROR=03 
00 and display error message 



sfliaa® 7 . 



sn 



*************** this section remaps NUMBER for conversion to hex *************** 



REMAP 


LDX 


$#03 


REMAP1 


LDA 


NUMBER, X 




STA 


NHI,X 




STA 


NLO,X 




DEX 






BNE 


REMAP1 




LDX 


$#03 


MASKS1 


LSR 


NHI,X 




LSR 


NHI.X 




LSR 


NHI,X 




LSR 


NHI,X 




LDA 


NLO,X 




AND 


MASKl 




STA 


NLO,X 




DEX 






BNE 


MASKS1 




LDY 


$#01 




LDX 


$#03 


REMAP2 


LDA 


NLO,X 




STA 


N,Y 




INY 






LDA 


NHI.X 




STA 


N,Y 




INY 






DEX 






BNE 


REMAP2 



A7 


A2 


03 


A9 


B5 


4B 


AB 


95 


12 


AD 


95 


15 


AF 


CA 




B0 


D0 


F7 


B2 


A2 


03 


B4 


56 


12 


B6 


56 


12 


B8 


56 


12 


BA 


56 


12 


BC 


B5 


15 


BE 


25 


0F 


C0 


95 


15 


C2 


CA 




C3 


D0 


EF 


C5 


A0 


01 


C7 


A2 


03 


C9 


B5 


15 


CB 


99 


18 


CE 


C8 




CF 


B5 


12 


Dl 


99 


18 


D4 


C8 




D5 


CA 




D6 


D0 


Fl 



load NUMBER 
into NHI 
and into NLO 

loop until done 

right shift 
NHI 
4 bits 



isolate right digit NLO 



loop until done 



store NLO into N 

alternately 
with NHI 
and in inverse order 



loop until done 



*************** tn ± s se ction converts N into hexadecimal *************************** 



HEXCNV 
LP1PWR 



© 



RESET2 

RESET3 
RESET4 

RESETS 



RESET6 



LDY 

JSR 
LDA 
CMP 
BEQ 
BCC 
STA 
TYA 
PHA 
JSR 
PLA 

TAY 
CLC 
LDX 
LDA 
ADC 
STA 
DEX 
BNE 
DEY 
BEQ 
DEC 
LDA 
CMP 
BEQ 
BCS 
LDA 
STA 
LDA 
STA 
STA 
LDA 
STA 
LDA 
CMP 
BEQ 
BCC 



$#06 

PWRCEN 

N,Y 

$#01 

RESET3 

RESET5 

MULTP 



MULT 



$#03 
MULTC,X 
HEXCON,X 
HEXCON,X 

RESET4 

HEXl 

PWR 

PWR 

$#01 

RESET6 

LP1PWR 

N,Y 

MULTC3 

$#00 

MULTC1 

MULTC2 

BASEl 

MULTP 

PWR 

$#01 

RESET2 

RESET3 



02D8 
DA 
DD 
E0 
E2 
E4 
E6 
E8 
E9 
EA 
ED 

EE 
EF 
F0 
F2 
F4 
F6 
F8 
F9 
FB 
FC 
FE 
0300 
02 
04 



0D 
0F 
11 
13 
15 
17 
19 
IB 
ID 



A0 06 

20 60 00 

B9 18 00 

C9 01 

F0 0B 

90 15 

85 IF 

98 

48 

20 80 00 

68 

A8 

18 

A2 03 

B5 IF 

75 25 

95 25 

CA 

D0 F7 

88 



F0 
C6 



21 
00 



A5 00 

C9 01 

F0 02 

B0 D2 

B9 18 

85 22 

A9 00 

85 20 

85 21 

A5 4A 

85 IF 

A5 00 

C9 01 

F0 CB 

90 D0 



for six places 

generate powers of BASEl 

N(Y)=01? 

if equal, go to RESET3 

if less, go to RESET5 

set MULTP=N(Y) 

put index Y into accumulator 

and push onto stack 
multiply power by N(Y) 
pull accumulator from stack 

and restore to Y 



add new product 
to intermediate product 
and store as intermediate product 

loop until done 
for next place 

if counter=0 bypass 
reduce power to be generated 

PWR=01? 

yes? go to RESET6 

greater? loop back to new conversion 

set MULTC=N(Y) 



set MULTP=BASE1 

PWR=01 ? 

yes? go to RESET2 

less? go to RESET3 



• 



*************** t £_£ s sec tion produces result from HEXCON when BASE2=10 ************* 

HEXl LDA BASE2 IF A5 4B 

CMP $#10 21 C9 10 BASE2=10? 

BCC 2ER02 23 90 10 no? go to ZER02 

LDY $#0C 25 A0 0C 



LDX $#03 



27 



A2 03 



saasa® 
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HEX2 



LDA 


HEXCON,X 


29 


B5 


25 




store HEXCON 


STA 


RESULT, Y 


2B 


99 


02 


00 


into RESULT 


DEY 




2E 


88 








DEX 




2F 


CA 








BNE 


HEX2 


30 


D0 


F7 




loop until done 


JSR 


SHORES 


32 


20 


90 


03 


and display result 



*************** this section divides HEXCON by BASE2 for crude conversion *********** 



ZER02 


STA 


DIVIS 




LDX 


$#03 


LP1DIV 


LDA 


HEXCON, X 




STA 


DIVD,X 




DEX 






BNE 


LP1DIV 




LDY 


$418 


LP2DIV 


JSR 


DIVIDE 




LDA 


RDR 




STA 


RSTOR,Y 




LDX 


$#02 


TST1Q0 


LDA 


QUO,X 




CMP 


$#01 




BCS 


RESET7 




DEX 






BNE 


TST1Q0 




LDA 


QU03 




CMP 


DIVIS 




BCC 


ENDDIV 


RESET7 


LDX 


$#03 


RST7A 


LDA 


QUO,X 




STA 


DIVD,X 




LDA 


$#00 




STA 


QUO,X 




DEX 






BNE 


RST7A 




STA 


RDR 




DEY 






BEQ 


ENDV2 




JMP 


LP2DIV 


ENDDIV 


DEY 






LDA 


QU03 




STA 


RSTOR,Y 



0335 


85 


2C 


37 


A2 


03 


39 


B5 


25 


3B 


95 


28 


3D 


CA 




3E 


D0 


F9 


40 


A0 


18 


42 


20 


10 01 


45 


A5 


30 


47 


99 


30 00 


4A 


A2 


02 


4C 


B5 


2C 


4E 


C9 


01 


50 


B0 


09 


52 


CA 




53 


D0 


F7 


55 


A5 


2F 


57 


C5 


2C 


59 


90 


15 


SB 


A2 


03 


5D 


B5 


2C 


5F 


95 


28 


61 


A9 


00 


63 


95 


2C 


65 


CA 




66 


D0 


F5 


68 


85 


30 


6A 


88 




6B 


F0 


09 


6D 


4C 


42 03 


70 


88 




71 


A5 


2F 


73 


99 


30 00 



set DIVIS=BASE2 

load HEXCON 
into DIVD 

loop until done 
for 18 places 
execute division 
load RDR 
into RSTOR 



QUO(l or 2)' '01? 
yes? go to RESET7 

loop until done 

QU03=DIVIS? 

less? go to ENDDIV 

load QUO 
into DIVD 

zero QUO 

loop until done 
zero RDR 

decrement place counter 
if =0 go to ENDV2 
otherwise back to divide routine 
decrement place counter 
load QU03 
into next RSTOR slot 



*************** t his section maps RSTOR into RESULT for final result **************** 
ENDV2 



REMAP3 



LDY $#0C 

LDX $#18 

CLC 

DEX 

LDA RSTOR, X 

ASL ASL 

ASL ASL 

INX 

ADC RSTOR, X 

STA RESULT, Y 

DEY 

DEX 

DEX 

BNE REMAPS 

JSR SHORES 



76 


A0 


0C 




78 


A2 


18 




7A 


18 






7B 


CA 






7C 


B5 


30 




7E 


0A 


0A 




80 


0A 


0A 




82 


E8 






83 


75 


30 




85 


99 


02 


00 


88 


88 






89 


CA 






8A 


CA 






8B 


D0 


EE 




8D 


20 


90 


03 



left shift alternate bytes 
RSTOR 4 bytes 



add to next byte RSTOR 
and store as RESULT 



loop until done 
and display result 



1 . PWRGEN 

Subroutine to generate a by successive iterations of multiplication subroutine MULT 

with resetting of counters and intermediate products; allows unsigned binary or 

decimal arithmetic in 6502 instruction set; maximum result memory allocated 18 bits. 

H 

Requires: subroutines: MULT 



data arrays: 


BASE1 


00 4 A 




PWR 


0000 




PWRS 


0001 




MULTP 


00 IF 




MULTC 


0020-0022 



Inapplicable to PWR=00 ,01 ; calling program must test and bypass. 



saaaa® 
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PWRCEN 


LDA 


PWR 


0060 


A5 


00 




STA 


PWRS 


62 


85 


01 




DEC 


PWRS 


64 


C6 


01 




LDA 


BASE1 


66 


A5 


4A 




STA 


MULTP 


68 


85 


IF 




STA 


MULTC3 


6A 


85 


22 




LDA 


$#00 


6C 


A9 


00 




STA 


MULT CI 


6E 


85 


20 




STA 


MULTC2 


70 


85 


21 




TYA 




72 


98 






PHA 




73 


48 




MULTCL 


JSR 


MULT 


74 


20 


80 




DEC 


PWRS 


77 


C6 


01 




BNE 


MULTCL 


79 


D0 


F9 




PLA 




7B 


68 






TAY 




7C 


A8 






RTS 




7D 


60 




2. MULT 













load power 
store in counter 
decrement counter 

set multiplier=base 
set multiplicand=base 

zero 2 high-order bytes 

of multiplicand 
transfer index Y to accumulator 

and onto stack 
jump to MULT 
decrement counter 
if ^0 return to MULTCL 
pull accumulator from stack 

and restore to index Y 
return to main program 



Subroutine multiplies 24-bit number (MULTC) by 8-bit number (MULTP) to 
yield 24-bit final product (MULTC) by successive iterations of nested 
addition loops. Intermediate product storage in MIDPRO. Allows unsigned 
decimal or binary operation in 6502 instruction set. 



Regui res 



da ta ar ra ys 



MULTP 
MULTC 
MIDPRO 



001F 

0020-0022 

0023-0025 



Inapplicable to MULTP less than 02; calling program to test and bypass 



MULT 


LDY 


MULTP 


0080 


A 4 


IF 


loop counter=mul ti pli er 




DEY 




82 


8 8 




decrement loop counter 




LDX 


$#03 


83 


A 2 


03 


set byte counter in loop 


REDIST 


LDA 


MULTC ,X 


85 


B5 


IF 


set intermediate register 




STA 


MIDPRO ,X 


87 


9 5 


22 


=mul ti pi i er 




DEX 




89 


CA 




for each byte in array 




BNE 


REDIST 


8A 


D0 


F9 


loop until X=0 


ADLP2 


LDX 


$#03 


8C 


A 2 


03 


set byte counter in loop 




CLC 




8E 


18 




clear carry 


ADLP1 


LDA 


MULTC ,X 


8F 


B5 


IF 


add multi plicand 




ADC 


MIDPRO ,X 


91 


75 


22 


to intermediate product 




STA 


MULTC ,X 


93 


9 5 


IF 


store as new multi plicand 




DEX 




95 


CA 




for each byte in array 




BNE 


ADLPl 


96 


D0 


F7 


loop until X=0 




DEY 




98 


8 8 




dec rement loop counter 




BNE 


ADLP2 


99 


D0 


Fl 


another loop if Y^0 




RTS 




9B 


60 




return to main program 


3. DIVIDE 















Subroutine to divide 24-bit dividend (DIVD) by 8-bit divisor (DIVIS) to 
yield 24-bit guoti ent (QUO) and 8-bit remainder (RDR) by successive shift 
and subtraction processes; unsigned binary arithmetic only in 6502 instruction 
set. Intermediate guotient storage in QUO. Reguires initialization of RDR 
and array QUO to by calling program, DIVIS^0 . 



Reguires : data arrays 



DIVD 
DIVIS 
QUO 
RDR 



0029-002B 
002C 

002D-002F 
0030 



9 



DIVIDE 
L00P1 



L0OP1A 



LDX $#19 

ASL RDR 

ASL QU03 

BCS HIQU01 

ASL QUO 2 

BCS HIQU02 



AS1 



QU01 



11 10 
12 
14 
16 

18 

1A 

1C 



A2 19 

06 30 

06 2F 

B0 28 

06 2E 

B0 2F 

06 2D 



t^^a® 



load shift counter 
left shift remainder 
left shift guotient LSB 
go to i nc rement ing routine 

if carry set 
left shift quotient mid-byte 
go to inc rementing routine 

if carry se t 
left shift guotient MSB 



7:53 



LOOP2 


CLC 






ASL 


DIVD3 




BCS 


HI0RD1 




ASL 


DIVD2 




BCS 


HI0RD2 




ASL 


DIVD1 


L00P3 


BCS 


INCR 


LO0P4 


DEX 






BEQ 


FINIS 




SEC 






LDA 


RDR 




SBC 


DIVIS 




BUI 


L00P1 




STA 


RDR 




ASL 


RDR 




ASL 


QU03 




INC 


QU03 




J MP 


LOOP1A 


HIQU01 


ASL 


QU02 




INC 


QU02 




BCS 


HIQV02 




ASL 


QU01 




JMP 


L00P2 


HIQV02 


ASL 


QU01 




INC 


QU01 




JMP 


LOOP2 


HIORD1 


ASL 


DIVD2 




INC 


DIVD2 




BCS 


HI0RD2 




ASL 


DIVD1 




JMP 


L00P3 


HI0RD2 


ASL 


DIVDl 




INC 


DIVD1 




JMP 


LOOP3 


INCR 


INC 


RDR 




JMP 


LOOP4 


FINIS 


LSR 
RTS 


RDR 



IB 


18 




IF 


06 


2B 


21 


B0 


2F 


23 


06 


2A 


25 


B0 


36 


27 


06 


29 


29 


B0 


39 


2B 


CA 




2C 


F0 


3B 


2E 


38 




2F 


A 5 


30 


31 


E5 


2C 


33 


30 


DD 


35 


85 


30 


37 


06 


30 


39 


06 


2F 


3B 


E6 


2F 


3D 


4C 


16 01 


43 


06 


2E 


42 


E6. 


2E 


44 


B0 


05 


46 


06 


2D 


48 


4C 


IE 01 


4B 


06 


2D 


4D 


E6 


2D 


4T 


4C 


IE 01 


52 


06 


2A 


54 


E6 


2A 


56 


B0 


05 


58 


06 


29 


5A 


4C 


29 01 


15D 


06 


29 


■5F 


E6 


29 


61 


4C 


■ 29 01 


64 


E6 


30 


66 


4C 


■ 2B 01 


69 


46 


30 


6B 


60 





clea r carry 

left shift dividend LSB 

go to inc rementing routine 

i f carry set 
left shift dividend mid-byte 
go to incrementing routine 

if carry set 
left shift dividend MSB 
go to incrementing routine 

if carry set 
decrement shift counter 
jump to end if X=0 
set carry 
from current remainder 

subtract divisor 
back to L00P1 if negative 
store difference as remai nder 
left shift remainder 
left shift quotient LSB 
increment quotient LSB 

and go back to L00P1A 
left shift quotient mid-byte 

and increment it 
go to further inc rementing 

r °utine if carry 
left shift quotient MSB 

and back to LOOP2 (if C=0) 
left shift quotient MSB 
inc rement quotient MSB 

and back to L00P2 
left shift dividend mid-byte 
increment dividend mid-byte 
go to further inc rementing 

routine if carry 
left shift dividend MSB 

and back to LO0P3 (if C=0) 

left shift dividend MSB 

increment dividend MSB 
and back to L00P3 

increment remainder 
and back to L0OP4 

right shift remainder to end 

return to main program 



4. SHOWER S TIMERl 

Subroutines to generate error message for display on the KIM-1 6-digit LED readout 
by successive lighting of appropriate segments of the individual digits using a 
message lookup table. 



SHOWER requires : subroutines: TIMERl 









SHORES 


0390-03CF 






da ta arra ys : 


SADD 

SBDD 

SAD 

SBD 

ERROR 

MSCERR 

MSGNUM 


17411 

1743] 

1740] 

1742) 

0002 

00 D6 -00 DA 

00DB-00DD 


SHOWER 


LDA 


$#7F 


00A0 


A9 7F 




STA 


SADD 


A2 


3D 41 17 




LDA 


$#1E 


A5 


A9 IE 




STA 


SBDD 


A7 


3D 43 17 


DISP2 


LDY 


$H08 


AA 


A0 08 




LDX 


$#05 


AC 


A2 05 


DISP1 


STY 


SBD 


AE 


8C 42 17 




LDA 


MSGERR,X 


Bl 


B5 D5 




STA 


SAD 


B3 


8D 40 17 




JSR 


TIMERl 


B6 


20 DE 00 




INY 




B9 


C8 



timing loop for display 
result display for ERROR=01 or 



monitor storage for readout 



set output directional vector A=7F 

set output directional vector B=1E 
set digit selection counter 
set loop counter 
select digit 
select segments 
to be lit (from lookup table) 
and jump to timing loop 
select next digit 



rwinfaracii 7.. 



INY 




BA 


C8 






DEX 




BB 


CA 






BNE 


DISP1 


BC 


D0 


F0 




LDA 


$#12 


BE 


A9 


12 




STA 


SBD 


C0 


8D 


42 


17 


LDX 


ERROR 


C3 


A6 


02 




LDA 


MSGNUM,X 


C5 


B5 


DA 




STA 


SAD 


C7 


8D 


40 


17 


JSR 


TIMER1 


CA 


20 


DE 


00 


LDA 


ERROR 


CD 


A5 


02 




CMP 


$#03 


CF 


C9 


03 




BEQ 


DISP2 


Dl 


F0 


D'l 




JMP 


SHORES 


D3 


4C 


90 


03 


lookup tables: 













decrement loop counter 
if ?0 loop again 

for sixth digit 
set index to error flag 
and select segments 
to be lit (from lookup table) 
and jump to timing loop 

if ERROR=03 

loop same display again 
otherwise jump to show result 



00D6 D0 DC D0 D0 
00DB 86 DB CF 



F9 



MSGERR 
MSGNUM 



TIMERl requires: interval timer location 1/ 



TIMER1 



DELAY 1 



LDA 


$#FF 


00DE 


A9 


Fl 


STA 


1707 


E0 


8D 


0'' 


NOP 




E3 


EA 




BIT 


1707 


E4 


2C 


0', 


BPL 


DELAY1 


E7 


10 


Ft. 


RTS 




E9 


60 





17 



17 



set timer for approximately 
200 milliseconds per digit 
do nothing but light segments 
time up? 
no? keep lit 
yes? back to SHOWER for next digit 



5. SHORES & TIMER2 







Subroutines to generate result display on the KIM-1 6-digit LED readout by loading 
appropriate data into array DISP for display by KIM monitor subroutine SCANDS . 



SHORES requires: subroutines: TIMER2 03D0-03E5 

SHOWER 00A0-00D5 

: data arrays: ERROR 0002 

RESULT 0003-000E 

BASE 004A-004B 

NUMBER 004C-004E 

DISP 00F9-00FA 



timing loop for display 

error display for ERROR=01 or 02 



monitor storage for readout: 
00F9 INH 

00FA POINTL 

00FB POINTH 



d 



SHORES 


LDY 


$#01 


0390 


A0 


01 






LDX 


$#03 


92 


A2 


03 




L0ADN1 


LDA 


NUMBER, X 


94 


B5 


4B 






STA 


DISP,Y 


96 


99 


F8 


00 




INY 




99 


C8 








DEX 




9A 


CA 








BNE 


L0ADN1 


9B 


D0 


F7 






JSR 


TIMER2 


9D 


20 


D0 


03 




LDA 


BASEl 


A0 


A5 


4A 






STA 


POINTH 


A2 


85 


FB 






LDA 


$#BB 


A4 


A9 


BB 






STA 


POINTL 


A6 


85 


FA 






LDA 


BASE2 


A8 


A5 


4B 






STA 


INH 


AA 


85 


F9 






JSR 


TIMER2 


AC 


20 


D0 


03 




LDX 


$#01 


AF 


A2 


01 




LOADN3 


LDY 


$#93 


Bl 


A0 


03 




LOADN2 


LDA 


RESULT, X 


B3 


B5 


02 






STA 


DISP, Y 


B5 


99 


F8 


00 




INX 




B8 


E8 








DEY 




B9 


88 








BNE 


L0ADN2 


BA 


D0 


F7 






TXA 




BC 


8A 







set index for DISP 
set index for NUMBER 
put NUMBER into DISP 

increment DISP index 
decrement NUMBER index 
loop until DISP is full 

and jump to timing/display loop 
load BASEl 

into two highest digits 
load BB 

into two middle digits 
load BASE2 

into two lowest digits 
and jump to timing/display loop 
set index for RESULT 
set index for DISP 
put RESULT (3 bytes at a time) 

into DISP 
increment RESULT index 
decrement DISP index 
loop until DISP is full 
put RESULT index into accumulator 
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PHA 




BD 


48 






JSR 
PLA 


TIMER2 


BE 
CI 


20 
68 


D0 


03 


TAX 




C2 


AA 






CPX 


$#0D 


C3 


E0 


0D 




BCC 


LOADN3 


C5 


90 


EA 




LDA 


ERROR 


C7 


A5 


02 




CMP 


$#00 


C9 


C9 


00 




BEQ 


SHORES 


CB 


F0 


C3 




JMP 


SHOWER 


CD 


4C 


A0 


00 



and push onto stack 
now jump to timing/ 'display loop 
pull accumulator from stack 

and put in RESULT index X 
is X>0C? 

if not, loop back to load DISP 
if yes, does ERROR=00? 

if yes, loop again for whole display 
otherwise show error 



TIMER2 requires: subroutines: SCANDS 



1F1F 



monitor display subroutine 



data arrays: CTLP 0049 

interval timer location 1707 



TIMER2 


LDA 


$#05 




STA 


CTLP 


DSPN2 


LDA 


$#FF 




STA 


1707 


DSPN1 


JSR 


SCANDS 




BIT 


1707 




BPL 


DSPNl 




DEC 


CTLP 




BNE 


DSPN2 




RTS 





03D0 
D2 


A9 

as 


05 
49 




03D4 
D6 


A9 
8D 


FF 
07 


17 


D9 
DC 
DF 


20 
2C 

10 


IF 
07 
F8 


IF 
17 


El 


C6 


49 




E3 
ES 


D0 
60 


EF 





set loop counter 

set timer for maximum run 

and call display subroutine 

time up? 

no? maintain display 

decrement loop counter 

if ?0 , reset timer and maintain display 

otherwise back to SHORES for next entry 




■THE BEST OF MICRO VOLUME J" 



Even though we had extra copies of MICRO printed 
we could not keep up with the demand for back 
issues. We have run out of all back issues and 
all copies of "All of MICRO Volume 1". Since a 
lot of people who are just finding out about 
MICRO or are just getting into the 6502 world 
still want the information which was contained 
in the first year of MICRO, we have decided to 
print "The BEST of MICRO Volume 1". 

This will contain most of the articles but none 
of the advertising. A few articles which were 
topical and are now out-of-date will be dropped 
and all known microbes will be corrected back in 
the original articles. The book will be 
organized by subject. Aside from these minor 
changes, the content will be identical to that 
of MICRO numbers 1 through 6. If you already 
have them, you will not profit by getting the 
new edition. If you do not have them, then this 
will be the only way to get the information. 

"The BEST of MICRO Volume 1" will be available 
about the first of November. It will be about 
160 page long in an 8 by 11 format, soft cover. 
The price will be $6.00 (plus $1.00 postage US) 

Send your Check or Money Order to: 

The BEST of MICRO 

P.O. Box 3 

So. Chelmsford, MA 01824 



ADVERTISING IN MICRO 

It doesn't COST to advertise in MICRO, it PAYS! 

MICRO is currently printing 10,000 copies for 
distribution. 3000+ will go immediately to sub- 
scribers and dealers. The remainder will go to 
new subscribers and to replenish dealer stock 
throughout the coming year - so you get a lot of 
coverage for your dollar, into a readership that 
is eager to know about 6502 oriented products. 

DEADLINES for Issue Number 8 - December/January 

Ad Reservation by 6 November 
Ad Copy by 13 November 

The rates are very reasonable for the coverage: 

Quarter Page (4 x 5) $50.00 
Half Page (8x5) $75.00 
Full Page (8 x 10) $125.00 

10Jo discount on six consecutive insertions. 

Send Ad copy to: 

MICRO, P.O. Box 3, So. Chelmsford, MA 01824 

or call for info or Ad reservation: 

617/256-3649 
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In performance. In quality- In availability- OEMs, educa- 
tors, engineers, hobbyists, students, industrial users: 
Our Versatile Interface Module, SYM-1, is a fully- 
assembled, tested and warranted microcomputer board 
that's a true single-board computer, complete with 
keyboard and display. All you do is provide a +5V 
power supply and SYM-1 gives you the rest— and that 
includes fast delivery and superior quality. 

Key features include: 

• Hardware compatibility with KIM-1 (MOS Technol- 
ogy) products. 

• Standard interfaces include audio cassette with 
remote control; both 8 bytes/second (KIM) and 185 
bytes/second (SYM-1) cassette formats; TTY and 
RS232; system expansion bus; TV/KB expansion 
board interface; four I/O buffers; and an oscilloscope 
single-line display. 

lo place your order now, contact your local area distributor or dealer. 



U j 



28 double-function keypad with audio response. 

4K byte ROM resident SUPERMON monitor inch 

ing over 30 standard monitor functions and user 

expandable. 

Three ROM/EPROM expansion sockets for 

24K bytes total program size. 

IK bytes 2114 static RAM, expandable to 

on-board and more off-board. 

50 I/O lines expandable to 70. 

Single +5V power requirements. 

Priced attractively in single unit quantities 

without keyboard/display, with OEM disc- 

larger quantities. 



Synertek Systems 
Corporation. 

150460 S. Wolfe Road. Sunnyvale, California 9408r 
(408)988-5690. 



OEM Distributors 

Kierulff Electronics 

Sterling Electronics (Seattle only) 

Zeus Components 

Century/' Bell 

Lionex 

Hallmark 

i-wrmarK Electronics 



Technico 
General Radio 
Western Microtechnology 
Future Electronics 
Alliance Electronics 
Arrow Electronics 

Personal Computer Dealers 
Newman CorriDuter Exchange 



Technico 

Columbia, Maryland 

Computerland 

Mayfield Heights, Ohio 

RNB Enterprises 

King of Prussia. Pennsylvania 

Computer Shop 

Cambridge. Massachusetts 

Computer Cash 



Ancrona 

Culver City. Calhomk 
Genera] Radio 
Camden, New -..Wise 1 . 

Advanced Corr.puttr 
Santa Ana, Califr ■■:■■ :d 

Computer Come ■ 
Van Nuys, Calif. "■ 

AHtrnnir; 



6502 SYSTEM SPECIALS 



SYSTEMS* 
Apple ii 16K ram S 1195 00 • Commodore pet 8K ram s 795 00 • commodore kim i S 175 00 

Synertek vim s 269 00 • Micro products Super KIM s 395 00 
"Delivery on most systems is usually stock to 2 weeks. Call or write for specific information. 

CLASSES AND WORKSHOPS 

All classes and workshops listed here are free of charge but have limited enrollment. Preference will be given to 
regular cci customers in the event of an overflow crowd. 

WORKSHOPS: Call for details. 

kim— 2nd Saturday of the Month • PET— 3rd Saturday of the Month 
apple— 4th Saturday of the Month 

CLASSES: Apple Topics 

We offer a series of free classes on Apple II to aquaint owners with some of the unique features and capabilities 

of their system. Topics covered are Apple sounds, Low Res. Graphics, Hi Res. Graphics, Disk Basics, and How to Use 

Your Reference Material. Sessions are held every Thursday Night at 7:00 p.m. 



SOFTWARE 

We now have a complete software catalog. 



APPLE: 
Apoietalker' 

Bomber- 
space Maze - 
Appievisiorr 
color organ- 
Las Vegas Slack lack 
Name ana Address 
Othello 

Microproauas Assembler— Tape 
MirroproauctsAssemoier— Disk 
HAM Test 
ROM Test 
Apple MUSIC 
Softape instant LiDrary 
18 tapes plus softape membership'! 

ON DISK: 

Inventory System 
Text Editor 
Mailing List 
Bac*order Report 
Electronic index Card File' 
Best of Bishop - 
tfi programs on one distil 
'Programs Ov BoB Bishop 

PET: 

Finance 

Draw 

Othello 

Blackjack 

Life 

Star Wars 

star Trek 

Mugwumps 

ftead'Wnte Memory 

Galaxy Games 

off The wall 'Target Pong 

Mortgage 

Diet Planner. Biorythm 

Basic BASIC 

Pet system Monitor 

Point & Figure Stock Market Plot 

TNT came Pack -1 

TNT Game Pack -2 



515 95 

9.95 

10.00 

5.00 

9.95 

10.00 

1000 

10.00 

19.95 

23.95 

7 50 

7.50 

15.00 

59 95 



125 DO 

50. DO 
3000 
50.00 
19 95 

49.95 



$3 95 
5 00 
5 00 
5.00 
500 
500 
500 
5.00 

1000 
9 95 
9 95 

1495 

14 95 
14 95 

19.95 
7.50 

10 DO 
10.00 



HARDWARE 

APPLE II HARDWARE: 

• Programmable Printer interface (Parallel! 

on hoard eorom printer driver, full handshake logic, driver program for 
Centronics. Axiom. T I svyTPC PR-dO, and others assembled & tested 580.00 

• Power Control interface (From TWC Products) 

Up to 16 channels of AC control Der card Controlled from BASIC Each 

channel capable of 12 amps at 110V. Optically isolated from AC line A.C. 

loads are switched via a low DC. voltage on a notion caDle icaole 

included) comoiete system eguipped far a a.c. circuits 

Kit 595.00 

Assemtjied si350o 

Additional 4 circuit A.C Power Modules 

Kit 555.00 

Assembled 555 oo 

■ joystick with 3 Switches 

Great for Apple Games like star wars includes trimmers to calibrate for 
full deflection S35.0O 

• Upper & Lower case Board 

Now you can displav ooth upper ana louver case characters on your video 
with the Apple II. includes assembled circuit board and sample 
software S49.95 



Apple Disk <l' 

Applesoft ROM Card- 

Heuristics Speechlab 

Apple High speed Serial Interface* 

Apple communications card' 

Apple prototyping Board 



5595.00 
S200 00 
S1S9 00 
5180. DO 
5180. DC 
52495 



■ vye are assuming that these items win oe available from stock by tne time 
this is published 

PET HARDWARE 

■ Beeper 524 95 

■ petunia— for computer generated sounds 529.95 

■ video Buffer-to put your pet s pictures on a television set or 
monitor S29 95 

■ Jovstlcn—witn four switches, speaker, and volume control 549 95 

• PR-ao Printer with cable for pet and printer driver software. 
software Kit ' 5500 00 
Assemtjied 5425 00 

• Centronics P-l Microprinter— with caoie and software for pet 5520.00 

■ Commodore wardcopy Printer .(available NoyemOer ?i $695.00 



WHY SHOULD YOU BUY FROM US? 

Because we can help you solve your problems and answer your questions, we don't claim to know 
everything, but we try to heip our customers to the full extent of our resources. 



COMPUTER COMPONENTS OF ORANGE COUNTY 

6791 Westminster Ave., Westminster, CA 92683 714-898-8330 

Hours: Tues-Fri 11:00 AM to 8:00 PM— Sat 10:00 AM to 6:00 PM (Closed Sun, Mon) 

Master Charge, Visa, B of A are accepted No COO. Allow 2 weeks for personal check to clear. 

Add $1.50 for handling and postage. For computer systems please add $10.00 for shipping, handling and 

insurance. California residents add 6% Sales Tax. 



